Lấy ngày và giờ trên máy như thế nào?

[david_it]

cho em hỏi?
Em muốn hiển thị ngày giờ theo ngày giờ của máy tính thi lam như nào?
Hiện thị cả ngày,tháng,năm và giờ.
Thì em phải đặt textbox như nào vạy các anh
Thanks các anh trước nha

 

[RedPearl]

Ðề: cho em hỏi

cho em hỏi?
Em muốn hiển thị ngày giờ theo ngày giờ của máy tính thi lam như nào?
Hiện thị cả ngày,tháng,năm và giờ.
Thì em phải đặt textbox như nào vạy các anh
Thanks các anh trước nha

Hiển thì ngày giờ ở đâu vậy em? Access hả?

 

[muontennguoi]

Ðề: Lấy ngày và giờ trên máy như thế nào?

Hàm Now trả về ngày tháng năm và cả giờ phút giây hiện tại.

Msgbox("Bâygiờ là " & Hour(Now) & " giờ " & Minute(Now) & " phút, ngày " & Day(Now) & " tháng " & Month(Now) & " năm " & Year(Now))

 

[david_it]

Ðề: Lấy ngày và giờ trên máy như thế nào?

DoCmd.OpenReport "inban1", , , "ten = '" & ten & "'AND ngay =#" & Format(ngay, "mm/dd/yy") & "#", bây giờ em muốn thêm vaof là giờ nữa thi thêm vào như nào vâyj anh

 

[vuthuanbkvn]

Ðề: Lấy ngày và giờ trên máy như thế nào?

hoặc bạn có thể làm như sau:
tạo một textbox với tên : ngaynhap
tạo sự kiện (event) : GotFocus()
với cấu trúc :
Private Sub ngaynhap_GotFocus()
ngaynhap = Now
thì sẽ hiện cả ngày giờ trùng với thời điểm bạn nháy vào textbox đó.
nếu chỉ muốn ngày thui thì : ngaynhap=Date
chúc vui!

 

[phatnq2002]

Ðề: Lấy ngày và giờ trên máy như thế nào?

DoCmd.OpenReport "inban1", , , "ten = '" & ten & "'AND ngay =#" & Format(ngay, "mm/dd/yy") & "#", bây giờ em muốn thêm vaof là giờ nữa thi thêm vào như nào vâyj anh

Thế ngày có chứa giờ không? nếu không chứa giờ thì khi lấy giờ của nó, nó sẽ trả về phần giờ là 0.

Để có thể nhập ngày mà chứa luôn giờ, bạn nên định cái field ngày đó có Format là dd/mm/yyyy hh:nn chẳng hạn rồi khi nhập thì nhập theo thứ tự như thế.

 

[david_it]

Ðề: Lấy ngày và giờ trên máy như thế nào?

DoCmd.OpenReport "inban1", acViewPreview, , "ten = '" & ten & "'AND ngay =#" & Format(ngay, "mm/dd/yy") & "#AND gio =#" & Format(gio, "hh:mm") & "#" lệnh của em như này có được ko? Vì em co thêm trường giờ nữa

 

[phatnq2002]

Ðề: Lấy ngày và giờ trên máy như thế nào?

DoCmd.OpenReport "inban1", acViewPreview, , "ten = '" & ten & "'AND ngay =#" & Format(ngay, "mm/dd/yy") & "#AND gio =#" & Format(gio, "hh:mm") & "#" lệnh của em như này có được ko? Vì em co thêm trường giờ nữa

Thế field giờ của bạn kiểu gì?
Nếu chỉ chứa giờ không thôi thì thì theo tôi bạn nên cho nó có kiểu là Text cho nó dễ. Làm cái Input Mask để khống chế kiểu nhập liệu, ví dụ 00:00

Khi dùng Text thì bạn chỉ cần "#AND gio ='" & gio & "'" là được

 

[david_it]

Ðề: Lấy ngày và giờ trên máy như thế nào?

field gio của tôi kiểu date/time, và lấy theo giờ của máy tính chứ minh ko phải nhập giống như trường ngày. Vậy để in ra theo tên, ngày, giờ thì có đc ko vậy?

 

[phatnq2002]

Ðề: Lấy ngày và giờ trên máy như thế nào?

field gio của tôi kiểu date/time, và lấy theo giờ của máy tính chứ minh ko phải nhập giống như trường ngày. Vậy để in ra theo tên, ngày, giờ thì có đc ko vậy?

Cái tham số thứ tư trong OpenReport là cái WHERE condition được nối thêm vào cái Recordsource của report. Nghĩa là cái field giờ phải có lưu trong table nguồn.

Nếu có lưu thì để như lúc đầu là được, còn không lưu thì đừng đưa cái giờ vào.