关于VB查询数据库返回相应结果的代码

str="select from members where 姓名=""" & text1text & "“” and 性别=“”“ & combo2text & """ and 班级=""" & combo1text & """"
按上述sql语句执行后，返回为查询结果，如果rsrecordcount=0，无符合条件记录，
字段名，要根据你数据库实际情况修改

1工程-部件-找到 mircosoft ado data control 60 控件,添加到工具
2在窗口放一个adodc1
3右键点adodc1,再点属性,在d出的窗口点"生成"按钮根据提示设置好数据库
4在form_load加入下面代码
Adodc1CommandType = adCmdText
Adodc1CursorLocation = adUseClient
Adodc1RecordSource = "select from 表"
Adodc1Refresh
5在按钮里加上下面代码
text1text=Adodc1RecordsetRecordCount

---