又错了,系统老是这样说... [请大家帮帮忙,我是新手!]

muddyboy 2003-03-25 02:28:28
提示"用户定义类型未定义"...

Private Sub Command1_Click()
Dim Db As Database ////这一行到底有什么错误??
Dim rs As Recordset
'Dim Spath As String
'Dim I As Integer
'Dim Condition As String
'联接数据库
'Condition = Trim(Text19.Text)
Spath = App.Path + "\" + "vote.mdb"
Set Db = OpenDatabase(Spath, False, True)
Set rs = Db.OpenRecordset("admin", dbOpenDynaset)
End sub
...全文
51 点赞 收藏 4
写回复
4 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
sxs69 2003-03-25
工程--引用--microsoft dao 3.6 object library
回复
smallsnig 2003-03-25
project->reference
回复
muddyboy 2003-03-25
能说得详细点吗?

谢谢pcwak(书剑狂生)
回复
pcwak 2003-03-25
工程--》引用
回复
相关推荐
发帖

1187

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
帖子事件
创建了帖子
2003-03-25 02:28
社区公告
暂无公告