luckylucke_2009
Thành viên mới

- Tham gia
- 17/7/09
- Bài viết
- 23
- Được thích
- 1
Thử chắc chắn chưa mà đưa code lên vậy trời?Private Sub UserForm_Activate()
Me.DTPicker1 = Format(Now(), "dd.mm.yyyy")
End Sub
Bạn tham khảo thêm link sau:
http://www.giaiphapexcel.com/forum/showthread.php?52486-Định-dạng-ngày-tháng-trên-Form
Thử chắc chắn chưa mà đưa code lên vậy trời?
Thế bạn chạy thử chưa?Em thử rồi mà thầy...
DTPicker0.CustomFormat = "dd-MM-yy"
DTPicker1.CustomFormat = "dd-MM-yy"
Private Sub UserForm_Activate()
Me.DTPicker1 = Now()
Me.DTPicker1.Format = 3
Me.DTPicker1.CustomFormat = "dd.MM.yyyy"
Me.DTPicker0.Format = 3
Me.DTPicker0.CustomFormat = "dd.MM.yyyy"
End Sub
Câu lệnh này đồng nghĩa với việc set property Format của DtPicker1 là 3-dtpCustomNguyên văn bởi vodoi2x
Me.DTPicker1.Format = 3
Câu lệnh này đồng nghĩa với việc set property Format của DtPicker1 là 3-dtpCustom