请教ACCESS + VB的判断问题(在线等)

VB怎样判断TEXT 里面的数据 在ACCESS 里面是否存在，不存在
则label1 显示 数据不存在 --------------------编程问答-------------------- if conn.execute("select * from 表 where 字段='"&(text1.text)&"'").eof then label1.caption="数据不存在" --------------------编程问答-------------------- 楼上YES --------------------编程问答-------------------- dim strsql as string

strsql="select * from tablename where aa='"& text1.text &"'"
rs.open strsql,conn,3,3

if rs.recordcount=0 then
   lable1.caption="不存在数据"
else
    lable1.caption="存在数据"
end if --------------------编程问答-------------------- 再给个加强版的

dim strsql as string

strsql = "select count(1) from tablename where fieldname = '" & replace(text1.text,"'","''") & "'"

rs.open strsql,cnn

if rs.fields(0).value > 0 then
   msgbox "数据存在"
else
   msgbox "数据不存在"
end if

补充：VB ,  数据库(包含打印，安装，报表)