ongke0711 > 17-02-16, 09:58 PM
khanghychu > 17-02-16, 10:49 PM
(17-02-16, 09:58 PM)ongke0711 Đã viết: Bạn chỉnh lại một chút.
-----------------
Private Sub Chucvu_Exit(Cancel As Integer)
If Not IsNull(Chucvu) Then Exit Sub
If MsgBox("Vui long nhap chuc vu nhan vien", vbYesNo + vbInformation, "Thong bao") = vbYes Then
HotenNV.SetFocus
Chucvu.SetFocus
End If
End Sub