Microsoft access database 2007 2010编码错误=编译错误:“;如果没有“如果”块,则结束;
这是我在登录屏幕上使用的代码,用于使用youtube链接登录Button,但我面临着困难。第一行以黄色突出显示,这可能表明它有问题:Microsoft access database 2007 2010编码错误=编译错误:“;如果没有“如果”块,则结束;,database,ms-access,Database,Ms Access,这是我在登录屏幕上使用的代码,用于使用youtube链接登录Button,但我面临着困难。第一行以黄色突出显示,这可能表明它有问题: Private Sub Command9_Click() If IsNull(Me.TxtUsername) Then MsgBox "Please enter Username", vbInformation, "Username required" Me.TxtUsername.SetFocus ElseIf IsNull(Me.txtPasswo
Private Sub Command9_Click()
If IsNull(Me.TxtUsername) Then
MsgBox "Please enter Username", vbInformation, "Username required"
Me.TxtUsername.SetFocus
ElseIf IsNull(Me.txtPassword) Then
MsgBox "Please enter Password", vbInformation, "Password required"
Me.txtPassword.SetFocus
Else
'process the job
If (IsNull(DLookup("[Username]", "User details", "[Username] ='" & Me.TxtUsername.Value & "' And password = '" & Me.txtPassword.Value & "'"))) Then
MsgBox "Incorrect Username or Password"
Else
DoCmd.Close
End If
End If
End If
End Sub
您有3个结束条件,但只有2个条件。 卸下其中一个端部