我都纳闷了
这是原来的部分代码,在网上下的图书管理系统,里面没有dll没有ocx没有ctl 只有一个模块 还全布是些变量的定义
但是人家的 可以用 各位随便把下面的这句Dim db As Database 加在一个空程序了 就知道了 说未定义 什么的~~ 不懂 有谁知道的 我记得只有string Boolean Integer等等 但人家用
Database Recordset 都能用 这是怎么会事?
怎么做到的?请问各位路过的~~ 下面是部分代码
Dim db As Database
Dim rst As Recordset
Dim Rec As Integer
Dim StrFlag As String
Dim Se As IntegerPrivate Sub Form_Load()
Lv.Visible = True
Picture2.Visible = False
Set db = Workspaces(0).OpenDatabase("Database\Data.mdb", False)
Set rst = db.OpenRecordset("Type", dbOpenTable)
rst.Index = "类别"
Disp
End Sub
这是原来的部分代码,在网上下的图书管理系统,里面没有dll没有ocx没有ctl 只有一个模块 还全布是些变量的定义
但是人家的 可以用 各位随便把下面的这句Dim db As Database 加在一个空程序了 就知道了 说未定义 什么的~~ 不懂 有谁知道的 我记得只有string Boolean Integer等等 但人家用
Database Recordset 都能用 这是怎么会事?
怎么做到的?请问各位路过的~~ 下面是部分代码
Dim db As Database
Dim rst As Recordset
Dim Rec As Integer
Dim StrFlag As String
Dim Se As IntegerPrivate Sub Form_Load()
Lv.Visible = True
Picture2.Visible = False
Set db = Workspaces(0).OpenDatabase("Database\Data.mdb", False)
Set rst = db.OpenRecordset("Type", dbOpenTable)
rst.Index = "类别"
Disp
End Sub
Recordset 记录集
database 数据库类型
Recordset 记录集类型
recordset声明的是记录集对象这样的还有很多,比如picture,Object,Form等等