Office中国论坛/Access中国论坛

标题: 急急。请教一个问题 [打印本页]

作者: 62597609 时间: 2003-2-11 23:24
标题: 急急。请教一个问题

我数据库中有个名为“名单“的数据表  数据表中仅有个名为“姓名“  的字段

我程序中引用了如下部件  VB for appli ,MS access9.0 object ,ms activex ,

ms dao3.6 object. 现在程序运行到最后一句，（即 Set recName = db.OpenRecordset

("名单") '将“名单”表读入记录集  ）  就不能运行，跳出对话框说是“运行时错误13,

类型不匹配“ 请问众高手，这是何故，有解决的方法吗  谢了!!! 整个程序如下

Dim db As Database '声明数据库对象变量

Dim recName As Recordset '声明记录集对象变量

Dim strName As Field '声明字段对象变量

Dim MyName(3) As String '声明一个存放“姓名”的数组

Dim intI As Integer '声明一个整型变量

Set db = CurrentDb() '指定数据库为当前数据库

Set recName = db.OpenRecordset("名单") '将“名单”表读入记录集

作者: cattjiu 时间: 2003-2-12 00:33
Office程序可能被破坏，试试到另一台电脑运行如果没有问题，就找一个好一点的office CD安装。

作者: 62597609 时间: 2003-2-12 05:55
我删去了以下程序,结果能运行了,请问这是何故

Dim recName As Recordset '声明记录集对象变量

Dim strName As Field '声明字段对象变量

Dim MyName(3) As String '声明一个存放“姓名”的数组

Dim intI As Integer '声明一个整型变量

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)