Vba 比较文本框和表字段
这是我的代码:Vba 比较文本框和表字段,vba,textbox,ms-access-2007,Vba,Textbox,Ms Access 2007,这是我的代码: Private Sub Command34_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Set db = CurrentDb() Set rs = db.OpenRecordset("sus-Table", dbOpenDynaset) Dim temp As String If Nametxt = rs![Name] And ID = rs![ID] An
Private Sub Command34_Click()
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb()
Set rs = db.OpenRecordset("sus-Table", dbOpenDynaset)
Dim temp As String
If Nametxt = rs![Name] And ID = rs![ID] And Address_1 = rs![Address 1] _
And Address_2 = rs![Address 2] And City = rs![City] And State = rs![State] Then
MsgBox "True"
Else
MsgBox "False"
End If
End Sub
对于这段代码,只要填充了所有字段(当然它们匹配),它就会返回true
但是,如果一个字段(地址2)为空,因为并非所有地址都需要第二行,即使它们匹配,它也会返回“False
”
即使它们是空的,我也不知道如何比较它们
在此问题上的任何帮助都将不胜感激。这听起来像是比较空与空的老问题,我建议这样重新编写:
And Address_2 & "" = rs![Address 2] & ""