leehoang2011 > 16-07-21, 11:48 PM
KheNgot > 17-07-21, 07:58 AM
leehoang2011 > 17-07-21, 09:33 AM
(17-07-21, 07:58 AM)KheNgot Đã viết: Mình làm demo này không biết đã đúng ý bạn chưa:
Link: https://drive.google.com/file/d/1NrIIYRf...sp=sharing
ongke0711 > 17-07-21, 12:04 PM
(17-07-21, 07:58 AM)KheNgot Đã viết: Mình làm demo này không biết đã đúng ý bạn chưa:
Link: https://drive.google.com/file/d/1NrIIYRf...sp=sharing
Private Sub cmdLuu_Click()
DoCmd.RunCommand acCmdSave
setFormState False
End Sub
Private Sub cmdSua_Click()
Me.Hovaten.SetFocus
setFormState True
End Sub
Private Sub Form_Load()
setFormState False
End Sub
Sub setFormState(blnState As Boolean)
Me.AllowAdditions = blnState
Me.AllowEdits = blnState
Me.AllowDeletions = blnState
End Sub