-
RE: Cần giúp đỡ về form Sub
nguyenthien0908 > 12-01-11, 09:38 AM
các bác ơi giúp em với em làm như thế này nhưng không đc:
Private Sub txtNgayRa_AfterUpdate()
If txtNgayRa = "31/12/2050" Then
txtTThai = -1
Else
txtTThai = 0
End If
End Sub
-
RE: Cần giúp đỡ về form Sub
Noname > 12-01-11, 09:52 AM
(12-01-11, 09:38 AM)nguyenthien0908 Đã viết: các bác ơi giúp em với em làm như thế này nhưng không đc:
Thử lại vầy xem
Private Sub txtNgayRa_AfterUpdate()
If txtNgayRa = "31/12/2050" Then
txtTThai = -1
Else
txtTThai = 0
End If
End Sub
Mã:Private Sub txtNgayRa_AfterUpdate()
If txtNgayRa = "31/12/2050" Then
txtTThai.value = -1
Else
txtTThai.value = 0
End If
End Sub -
RE: Cần giúp đỡ về form Sub
nguyenthien0908 > 12-01-11, 10:11 AM
vẫn chưa được bác ạ, không thấy thay đổi gì. bác xem lại giúp em với ạ, đây là file em đã sửa lại theo hướng dẫn của bác haquocquan: http://www.mediafire.com/?9xj550ilh5aq0ci -
RE: Cần giúp đỡ về form Sub
haquocquan > 12-01-11, 11:26 AM
Bạn thử nhé,
Mình điều chỉnh một chút:
- thuộc tính format của txtNgayra
- Sự kiện AfterUpdate của txtNgayra
http://www.mediafire.com/?xqnrgg4keuanxib -
RE: Cần giúp đỡ về form Sub
nguyenthien0908 > 12-01-11, 11:36 AM
cảm ơn bác được rồi ạ. -
RE: Cần giúp đỡ về form Sub
nguyenthien0908 > 17-01-11, 05:40 PM