我正在microsoft access中建立一个登录屏幕“用户名”是我得到错误代码后突出显示的内容。
代码如下:
Private Sub btnLogin_Click()
Dim rs As DAO.Recordset
Dim SQL As String
SQL = "SELECT * FROM Users WHERE * "username = '" + Me.txtUserName + "'"
End With
Set rs = CurrentDb.OpenRecordset(SQL)
If rs.EOF Then
IncorrectUserNameStyle
Exit Sub
End If
End If
End Sub
2条答案
按热度按时间bgtovc5b1#
你的绳子不好看,这个怎么样:
0qx6xfy62#
看起来查询中有一个输入错误(a)
"
在不应该的地方),标记如下: