Tùy chọn
[Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
- [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
-
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
phungminhluan > 28-11-16, 10:47 PM
Bạn ơi mình đã thực hiện được, tuy nhiên khi bấm vào nút chọn ngày mà trong textbox có ngày sẵn thì nó không tự nhảy đến ngày đó như bạn nói mà nó khoanh đỏ ngày hiện hành trên hệ thống. Nhờ bạn kiểm tra code lại xem. -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
huuduy.duy > 29-11-16, 08:44 AM
(28-11-16, 10:47 PM)phungminhluan Đã viết:
Mình cũng không hiểu tại sao khi trên form của Anh maidinhdan thì khi double click bình thường, nhưng khi đưa vô ứng dụng của mình thì lại báo lỗi như hình ở bài #10Bạn ơi mình đã thực hiện được, tuy nhiên khi bấm vào nút chọn ngày mà trong textbox có ngày sẵn thì nó không tự nhảy đến ngày đó như bạn nói mà nó khoanh đỏ ngày hiện hành trên hệ thống. Nhờ bạn kiểm tra code lại xem. -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
ongke0711 > 30-11-16, 11:15 AM
(26-11-16, 09:31 AM)huuduy.duy Đã viết:
![[Hình: UtFQXb.png]](http://imageshack.com/a/img922/369/UtFQXb.png)
http://[/img]
Báo lỗi này của bạn là đoạn code "Tenform.FormHeader.Height" không tìm thấy Form header.
Form bạn thiết kế chỉ có phần Detail (Detail section) mà không có Form header. Bạn chỉ cần thêm Form Header vô cho có và kéo chiều cao nó = 0 là được rồi (coi như không hiển thị).
Bạn còn 1 lỗi nữa là không import cái frmCalendar thì lấy gì nó hiện ra. Đây là form ẩn, unhide nó rồi import.
(28-11-16, 10:47 PM)phungminhluan Đã viết:
Bạn ơi mình đã thực hiện được, tuy nhiên khi bấm vào nút chọn ngày mà trong textbox có ngày sẵn thì nó không tự nhảy đến ngày đó như bạn nói mà nó khoanh đỏ ngày hiện hành trên hệ thống. Nhờ bạn kiểm tra code lại xem.
Còn riêng việc hiện lịch đúng này trong textbox thì tôi thấy chương trình hiển thị đúng chứ có sai đâu. -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
ongke0711 > 30-11-16, 11:45 AM
Bổ sung thêm cho việc hiển thị lịch tùy chọn:
- Đối với Access 2007 trở lên thì có thêm tính năng tự động hiển thị lịch từ hệ thống nếu textbox có dạng Date (Access 2003 tôi không biết có không). Do vậy khi tích hợp code hiển thị lịch tùy chọn của bác maidinhdan thì nó sẽ cũng sẽ hiển thị luôn lịch hệ thống khi để con trỏ trong textbox Date. Để đỡ rối mắt thì bạn phải bỏ việc tự động hiển thị này. Bạn vô Properties của textbox Date -> Format -> Show Date Pickers -> chọn Never.
![[Hình: 31291948276_5044f4e7d9_b.jpg]](https://c5.staticflickr.com/6/5813/31291948276_5044f4e7d9_b.jpg)
- Nếu bạn đã có nhiều form thiết kế với nhiều textbox dạng Date này thì vô chọn "Show Date Picker" của từng textbox cũng mất thời gian. Có đoạn code này để bạn gọi chạy một lần nó sẽ set "Never" cho toàn bộ textbox dạng Date.
- Copy vô module hay form module cũng được vì chỉ gọi chạy 1 lần:
Mã PHP:Sub DisableDatePicker()
On Error GoTo Error_Handler
Dim ctl As Access.Control
Dim frm As AccessObject
For Each frm In CurrentProject.AllForms
DoCmd.OpenForm frm.Name, acDesign
For Each ctl In Forms(frm.Name).Form.Controls
Select Case ctl.ControlType
Case acTextBox
ctl.ShowDatePicker = 0
End Select
Next ctl
DoCmd.Close acForm, frm.Name, acSaveYes
Next frm
Error_Handler_Exit:
On Error Resume Next
Set ctl = Nothing
Set frm = Nothing
Exit Sub
Error_Handler:
MsgBox "The following error has occured." & vbCrLf & vbCrLf & _
"Error Number: " & Err.Number & vbCrLf & _
"Error Source: DisableDatePicker" & vbCrLf & _
"Error Description: " & Err.Description, _
vbCritical, "An Error has Occured!"
Resume Error_Handler_Exit
End Sub -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
thanh.thkt > 12-12-16, 09:51 PM
(16-11-16, 04:40 PM)maidinhdan Đã viết:
(16-11-16, 03:37 PM)thanh.thkt Đã viết: Nhờ bạn maidinhdan cho mình xin file .mdb và pass VBA vào mail thanh0826@gmail.com với. Cảm ơn bạn nhiều.
Đã gửi lúc : 15:39 Ngày 16 tháng 11 năm 2016
Sao mình không nhận được mail. Nhờ bạn gởi lại cho mình với. Cảm ơn bạn. -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
maidinhdan > 13-12-16, 04:48 PM
(12-12-16, 09:51 PM)thanh.thkt Đã viết:
(16-11-16, 04:40 PM)maidinhdan Đã viết:
(16-11-16, 03:37 PM)thanh.thkt Đã viết: Nhờ bạn maidinhdan cho mình xin file .mdb và pass VBA vào mail thanh0826@gmail.com với. Cảm ơn bạn nhiều.
Đã gửi lúc : 15:39 Ngày 16 tháng 11 năm 2016
Sao mình không nhận được mail. Nhờ bạn gởi lại cho mình với. Cảm ơn bạn.
Đã gửi lại lần 2 lúc: 15:44 Ngày 13 tháng 12 năm 2016
Gửi cách đây 1 tháng mà giờ mới phản hồi nhận không được, Nếu lần này không nhận được Email nửa thì tôi sẽ chụp hình của Gmail của mình gửi bạn xem.
Thân mến! -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
thanh.thkt > 06-01-17, 10:55 PM
(13-12-16, 04:48 PM)maidinhdan Đã viết:
(12-12-16, 09:51 PM)thanh.thkt Đã viết:
(16-11-16, 04:40 PM)maidinhdan Đã viết:
(16-11-16, 03:37 PM)thanh.thkt Đã viết: Nhờ bạn maidinhdan cho mình xin file .mdb và pass VBA vào mail thanh0826@gmail.com với. Cảm ơn bạn nhiều.
Đã gửi lúc : 15:39 Ngày 16 tháng 11 năm 2016
Sao mình không nhận được mail. Nhờ bạn gởi lại cho mình với. Cảm ơn bạn.
Đã gửi lại lần 2 lúc: 15:44 Ngày 13 tháng 12 năm 2016
Gửi cách đây 1 tháng mà giờ mới phản hồi nhận không được, Nếu lần này không nhận được Email nửa thì tôi sẽ chụp hình của Gmail của mình gửi bạn xem.
Thân mến!
Thành thật xin lỗi bạn MaiDinhDan, không biết sao Email bạn gởi cho mình lại nằm trong hộp thư Spam, nên mình không tìm thấy trong Inbox. Nay mình đã nhận được email và đã sử dụng được. Cảm ơn bạn nhiều. -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
dangh5 > 08-01-17, 12:51 PM
Cho minh xin file voi, dahota@gmail.com Thank!
Do minh Gui bang Dt nen ko go dau dc. -
RE: [Shared Code- PhầnII]Chọn ngày tháng bằng click chuột [No Calendar]
nguyenhungcuong > 16-04-17, 04:56 PM
bạn cho mình xin file .mdb và pass vba. email: hungcuong113vn@gmail.com cảm ơn bạn nhiều