菜鸟

Question

Dim db As Database
这样定义db有什么错误啊？

Answer 1

Dim db As Database 这样定义没有错误,如果要使用 db 建议:
采用以下二种方式
1.
定义:
Dim db As new Database 使用:
直接使用.2.
定义:
Dim db As Database 使用之前:
set db =new Database 
或:
set db = 实类
后再使用.

Answer 2

用户定义类型未定义没有 DataBase 的数据类型.你确认,你自己定义了或引用了 DataBase 类?如果没有,那就错误.在VB中 DataBase 是属性,不是类.  如果你要用此句语,要自己建议一个 DataBase 类.

Answer 3

要在工程/引用菜单下引用DAO
建议你学用ADO......

Answer 4

源代码是这样的
在模块中定义
Public db As Database
Public rsdata As Recordset
Sub main()
Set db = OpenData(App.path& "学生信息.mdb")
Set rsdata = db.OpenRecordset("信息表")
Form1.Show
End Sub
已经引用了DAO
其实那个App.path应用程序的路径具体指什么，还不是很清楚？后面有个查询按钮的代码是
rsdata.MoveFirst
Do While Not rsdata.EOF
If rsdata.Fields(0).Value = Text1.Text Then
   Text2.Text = rsdata.Fields(0).Value
   Text3.Text = rsdata.Fields(1).Value
   Text4.Text = rsdata.Fields(2).Value
   End If
   rsdata.MoveNext
   Loop
 显示对象变量或with块变量未设置，rsdata.MoveFirst这行。这个错误是什么意思啊？拜托  

Answer 5

Set db = OpenData(App.path & "\学生信息.mdb") 

Answer 6

Dim db As new Database