Private Sub Command3_Click()
    Call openconn
    
    sqlstr = "update hello set password='" & Text5.Text & "',quanxian='" & Check1.Value & "' where user= '" & Text4.Text & "'"
    
    Call rs(sqlstr)
    
    Call closeconn
    
    MsgBox "Changed Successfully!", vbInformation
    
End Sub
我的目的是修改数据,可是不对,老给我报错,如下:Erroe occured:-2147217900 UPDATE的语法错误。in Microsoft JET Database Engine
我的数据库如下access
user 文本
password 文本
quanxian 文本