-
tách do post thừa
rainkv > 16-07-15, 07:25 AM
- Sao mình làm bằng đoạn này:
Mã PHP:Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim strCriteria As String
Dim intResponse As Integer
strCriteria = DLookup("[MSo]", "DANHSACHHOCSINH", _
"[MSo] = Form![MSo]")
If DCount("*", "DANHSACHHOCSINH", strCriteria) > 0 Then
MsgBox ("Da bi trung ma hoc sinh.")
Me.Undo
End If
End Sub
mà khi vừa thoát khỏi textbox Maso vẫn không báo lỗi đến khi mình nhấn vào button Lưu mới báo lỗi là sao vậy ban?
hơn nữa mình ko muốn khi xóa tất cả record đó khi báo lỗi trùng mã số thì làm sao bạn?