Tweet
[help] Đồng hồ sử dụng cổng COM
Các pro cho hỏi là muốn thay đổi thời gian trong VB6 thì phải dùng hàm nào. Mình dùng như này nhưng thời gian chỉ thay đổi đc vài giây rùi lại trở về như lúc ban đầu.
Private Sub Command3_Click()
If IsDate(Text3.Text) Then
Date = Format(Text3.Text, "dd/mm/yyyy")
Else
MsgBox "Moi Ban Nhap Lai Theo Mau dd/mm/yyyy", vbOKOnly, "Thông báo"
End If
Text3.Text = ""
End Sub
Private Sub Command3_Click()
If IsDate(Text3.Text) Then
Date = Format(Text3.Text, "dd/mm/yyyy")
Else
MsgBox "Moi Ban Nhap Lai Theo Mau dd/mm/yyyy", vbOKOnly, "Thông báo"
End If
Text3.Text = ""
End Sub
Comment