Question

关于VB的ADODC控件的问题

我想用ADODC控件做一个控件，让他连接上一个Access数据库，按条件查询记录，以下是我的代码：
Adodc1.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source =I:\Program Files\Microsoft Visual Studio\数据库\学生信息管理系统.mdb"
Adodc1.CommandType = adCmdText
If Combo2.Text = "等于" Then Adodc1.RecordSource = "select *from 学生成绩 where " & Trim(Combo1.Text) & "<'" & Trim(Text1.Text) & "'"
Adodc1.Refresh
如果我想让这段代码实现找不到记录后报错，应该加段什么代码？？
求详解

Answer 1

Set rs = New ADODB.Recordset
If rs.BOF And rs.EOF Then
MsgBox "没有查询到结果！", vbCritical, "查询结果"
end if
加在你那个 Adodc1.Refresh 前面，应当能看懂吧！

Answer 2

你的这个是不是采取的控件绑定的方法？

Answer 3

在
Adodc1.Refresh
后面加上：
if Adodc1.Recordset.RecordCount=0 then msgbox "无记录"