Access management system for water and electricity
no vote
Peak trombone Private _Click Sub cmd query ()
On Error GoTo Err_cmd query _Click
Dim strWhere As String' defined criteria string
StrWhere= "" ' set initial value-an empty string
' Judge "personnel ID" condition has the input value
If Not IsNull (Me. personal ID) Then
' Input
StrWhere=strWhere& "([staff ID]='" &Me. officers ID& "') AND"
End If