一个简单的问题

Question

我老是出现这个问题，If mrc.eor=True then ....
这句代码有错误，说什么对象事件或With 变量没有定义。
好郁闷啊!有哪位大哥能告诉我啊？先谢谢了!

Answer 1

哦，打错了，是if mrc.eof=True then...   关系到我的毕业设计啊。各位帮帮我啊!
    在线等待!

Answer 2

是不是mrc只定义了，没实例化？
如果你是使用ADO，那么定义的时候同时给它实例化：
Dim mrc As New ADODB.Recordset

Answer 3

Dim Con As ADODB.Connection
    Dim rs As ADODB.Recordset
    Set Con = New ADODB.Connection
    strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\计划管理系统.mdb;Persist Security Info=False"
    Con.Open strCon
    Set rs = New ADODB.Recordset
    strsql="select * from table"
    rs.Open strsql, Con, adOpenKeyset, adLockOptimistic 
    if not rs.eof then
       message "有数据"
    else
       message "无数据"
    end if

Answer 4

肯定又是没有实例化
Dim mrc As New ADODB.Recordset

Answer 5

支持上边的说法。
Dim mrc As New ADODB.Recordset