高考问答五彩斑斓的世界啥意思:vb中的怪问题实时错误，有感兴趣的进，聊聊
来源：百度文库 编辑：高考问答 时间：2024/04/26 03:32:35
今天做着VB突然间出现弹出错误框，错误号91，对象变量和或WIHT块变量未设置
其代码如下：
'数据库连接
Data1.DatabaseName = App.Path + "\stu.mdb"
Data1.RecordSource = "select id as " & "学号" & ",sname as " & "姓名" & ",sex as " & "性别" & ",face as " & "政治面貌" & ",mobilecall as " & "移动电话" & ",brith as " & "出生年月" & ",jibie as " & "班级" & ",code as " & "身份证号" & ",falimc all as " & "家庭电话" & ",mail as " & "邮政编码" & ",address as " & "家庭住址" & " from student"
'combol的初始化
Data1.Recordset.MoveFirst
While Not Data1.Recordset.EOF
'向地区分类中添加省级单位
Wend
其中Data1.Recordset.MoveFirst为黄色显示，但我感觉错误在While Data1.Recordset.EOF，在调试状态下，把鼠标放在 Data1.Recordset.EOF上它显示 Data1.Recordset.EOF＝＜对象变量和或WIHT块变量未设置＞，于是我在改写成了
While Not Data1.Recordset.EOF＝True
还是同样的错误！！！！！！！！！！！！！！！！！！
急求
我的QQ号是249967333
加我交个朋友？？？？？？
其代码如下：
'数据库连接
Data1.DatabaseName = App.Path + "\stu.mdb"
Data1.RecordSource = "select id as " & "学号" & ",sname as " & "姓名" & ",sex as " & "性别" & ",face as " & "政治面貌" & ",mobilecall as " & "移动电话" & ",brith as " & "出生年月" & ",jibie as " & "班级" & ",code as " & "身份证号" & ",falimc all as " & "家庭电话" & ",mail as " & "邮政编码" & ",address as " & "家庭住址" & " from student"
'combol的初始化
Data1.Recordset.MoveFirst
While Not Data1.Recordset.EOF
'向地区分类中添加省级单位
Wend
其中Data1.Recordset.MoveFirst为黄色显示，但我感觉错误在While Data1.Recordset.EOF，在调试状态下，把鼠标放在 Data1.Recordset.EOF上它显示 Data1.Recordset.EOF＝＜对象变量和或WIHT块变量未设置＞，于是我在改写成了
While Not Data1.Recordset.EOF＝True
还是同样的错误！！！！！！！！！！！！！！！！！！
急求
我的QQ号是249967333
加我交个朋友？？？？？？
是这样的，在改变Data控件的数据库连接后一定要记得
用 Refresh 刷新以下
...
Data1.Refresh
Data1.Recordset.MoveFirst
...
这样再看看，或许就好了
我也遇到过哦，你好好看看连接数据库那一段就行