关于VB数据库的字段的比较!!!

Question

请教各位:
    我想问的是比如有一个表叫表A,里面有一字段"XINGMING"
    窗体上有一个text1和一个command1,在TEXTBOX上输入文字,
    点下command1,要比较表A里面字段"XINGMING"中有没有符合
    text1中输入的文字,如果有的话就显示查到记录,反之就显示
    查无记录...
    请问这应该怎样实现````
请高手指点下````

Answer 1

'SQL可以这样写:
SQLStrn = "Select * From TABLE Where XINGMING = " & Trim(Text1.Text)

Answer 2

Dim rctFind As ADODB.Recordset
Dim strFind As String
strFind = "Select * From TABLE Where XINGMING = '" & Trim(Text1.Text) & "'" 
Set rctFind = con.Execute(strFind )
  
  If Not (rctUser.EOF And rctUser.BOF) Then
     msgbox "有相同记录" 
ELSE
      msgbox "没有相同记录" 
     
   End If

Answer 3

差不多就是楼上的那样思路！你可以搜索一下，有例子的！
Dim rs As ADODB.Recordset
dim con as adodb.connection
Dim sql As String
sql= "Select * From A Where XINGMING = '" & Trim(Text1.Text) & "'" 
con.open ... '看你什么数据库了，连接字符串自己写
rs.open sql,con
  
  If Not (rctUser.EOF And rctUser.BOF) Then
     msgbox "有相同记录" 
ELSE
      msgbox "没有相同记录" 
     
   End If