hieuvn > 15-12-10, 09:43 AM
Noname > 15-12-10, 10:02 AM
select * from table where ngay between Form!tênform!từngày and Form!tênform!denngay
hieuvn > 15-12-10, 10:44 AM
(15-12-10, 10:02 AM)Noname Đã viết: Lọc dữ liệu theo ngày tháng thì chỉ đơn giản là 2 textbox cho nhập từ ngày - đến ngày là được. Trong sự kiện afterupdate của denngay, ta cho subform.requery
Trong sub form, lấy nguồn:
Mã:select * from table where ngay between Form!tênform!từngày and Form!tênform!denngay
.
Còn như ý của bạn không phải là không làm được, nhưng Access không hỗ trợ sẵn. Chỉ có thể biết today là ngày hệ thống, còn tomorow, yesterday...thì tự bạn phải tính ra. Nhưng làm vậy phức tạp và nặng nề hơn.
Muốn có comboxbox chọn ngày trong lịch thì trong thanh toolbox, chọn more control, tìm đối tượng : Microsoft Date and Time Picker Control 6.0
Sử dụng nó như 1 combobox bình thường.
Tuy nhiên mình không khoái xài cái này lắm vì yêu cầu máy khác cũng phải cài full office mới xài được!
Noname > 15-12-10, 11:13 AM
(15-12-10, 10:44 AM)hieuvn Đã viết: cảm ơn noname, mình đã tạo 1 textbox để tự nhập ngày vào, còn như bạn nói dùng combo lấy nguồn từ dữ liệu thì phải cuộn chuột rất mỏi tay, nên mình muốn có 1 combo có sẵn 1 số dữ liệu ngày tháng do mình đặt ra giống như mình đã nói ở trên nhưng xem ra có vẻ hơi phức tạp bạn nhỉ. Bạn cho mình hỏi thêm nếu tạo 1 nút clear filter chẳng hạn thì sub form sẽ hiện tất cả ngày tháng (show all record) thì code cho button này sẽ viết như thế nào?
bangnguyencong > 14-02-11, 11:41 PM
Noname > 18-03-11, 03:41 PM
(14-02-11, 11:41 PM)bangnguyencong Đã viết: Máy mình không có control "Microsoft Date and Time Picker Control 6.0". Theo NoName thì phải cài Full Office. Mình cũng thường cài Office nhưng không biết cách cài đặt để có control "Microsoft Date and Time Picker Control 6.0". NoName hãy chỉ cách cài này.
Cảm ơn anh nhiều!!!
chipag > 19-03-11, 02:25 AM
haquocquan > 19-03-11, 04:28 PM
thangbom01 > 04-10-11, 10:32 PM
domfootwear > 05-10-11, 02:16 PM
(04-10-11, 10:32 PM)thangbom01 Đã viết: Mình cũng có một form lọc dữ liệu theo ngày tháng, mình làm thử cách cửa noname nhưng vẫn không được. Bạn nào có thể giúp mình được không ?
Đây là data của mình [/align]
http://www.mediafire.com/?u6ibpated3vjrlv
Private Sub TKiem_Click()
Dim tk As String
tk = "SELECT HD_ID, Ten_KH, Diachi, Tenhang, soluong, Dongia, Thanhtien, Ngaythang, NguoilapHD " & _
"FROM Hoadon " & _
"WHERE (((Ten_KH) Like '" & IIf(IsNull(cmb_KH), "*", cmb_KH) & _
"') AND ((Ngaythang) Between [forms]![frm_TK_HoaDon]![txt_Tungay] And " & _
"[forms]![frm_TK_HoaDon]![txt_Denngay]));"
Me.Hoadon_subform.Form.RecordSource = tk
Me.Hoadon_subform.Form.Requery
End Sub