请教高手！！！代码出错。

myself2008 · 发表于 2005-7-15 20:25

为什么运行该段代码的时候。

Private Sub AddNew_Click() Dim dbs As Database Dim rec As Recordset Set dbs = CurrentDb Set rec = dbs.OpenRecordset("Table1", dbOpenDynaset) With rec .AddNew !姓名 = Me.姓名.Value .Update End With End Sub 会出现Dim dbs As Database 用户定义类型未定义。

中国深圳 · 发表于 2005-7-16 07:59

需要引用 DAO 。

myself2008 · 发表于 2005-7-16 12:27

需要引用 DAO 。怎么应用呢？能不能够帮我修改一下呢？？

中国深圳 · 发表于 2005-7-16 12:54

进入代码视图点工具---引用然后在microsoft dao 3.6 object library 选项前打钩。

myself2008 · 发表于 2005-7-16 13:50

呵呵，我真笨，先谢过了。。呵呵

中国深圳 · 发表于 2005-7-16 15:24

以下是引用myself2008在2005-7-16 13:50:57的发言： 呵呵，我真笨，先谢过了。。呵呵

如果我啥都会了，我就不来这里了。呵呵......

myself2008 · 发表于 2005-7-19 07:26

呵呵，太谦虚了，我可以实现该段代码了。对了如何选取子窗体的一个字段的值作为主窗体的值呢？这几天都想不出来。痛苦

中国深圳 · 发表于 2005-7-19 07:57

需说你说详细一点，我还不是很明白你的需求。

		自动登录	找回密码
密码			免费注册