Office中国论坛/Access中国论坛

标题: ACCESS窗体控件出问题 [打印本页]

作者: 新缘依旧    时间: 2011-9-16 16:09
标题: ACCESS窗体控件出问题
本帖最后由 新缘依旧 于 2011-11-4 09:09 编辑

Visual Basic for Applications (VBA) 在试图存取属性或方法时遇到问题。 可能是下列问题之一:
缺少参考值。
关于如何恢复缺少的参考值的帮助,请参阅 Microsoft 知识库文章283806。
表达式拼错。
检查在事件属性中使用的所有表达式以了解正确拼写。
一个用户定义的函数被声明为模块中的子函数或私有函数。
只有当函数被声明为下列只一时,表达式才可以解析用户定义的函数:
模块中的公用函数
当前表单或报表的代码模块中的公用或私有函数
Access 的安全性设置为“中”或“高”,并且未安装 Microsoft Jet 4.0 SP8 更新。
当 Access 的安全性设置为“中”或“高”时,要使 Access 功能正确运行,必须安装更近版本的 Jet 4.0。要获取最近版本的 Microsoft Jet,请访问 Windows Update。


麻烦知道的帮忙说下解决办法

Option Compare Database

Private Sub 车间_AfterUpdate()
Me.操作者.Requery
End Sub

Private Sub Command45_Click()
On Error GoTo Err_Command45_Click


    Screen.PreviousControl.SetFocus
    DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Command45_Click:
    Exit Sub

Err_Command45_Click:
    MsgBox Err.Description
    Resume Exit_Command45_Click
   
End Sub


这是代码 你们看下 谢谢
作者: nxjswt    时间: 2011-9-16 16:16
标题:
本帖最后由 nxjswt 于 2011-9-16 16:16 编辑

打开一个空的access,将宏安全性放置到最低。然后再打开您的开发的数据库看看
作者: 新缘依旧    时间: 2011-9-27 10:26
nxjswt 发表于 2011-9-16 16:16
打开一个空的access,将宏安全性放置到最低。然后再打开您的开发的数据库看看

不行 还是会有这个提示
作者: Henry D. Sy    时间: 2011-9-27 14:42
把例子传上来看看
作者: 新缘依旧    时间: 2011-10-10 10:25
[attach]46895[/attach][attach]46895[/attach]
作者: todaynew    时间: 2011-10-10 13:07
新缘依旧 发表于 2011-10-10 10:25

把数据库压缩一下,再试试。如还不中,看看是不是丢失了什么引用。
作者: andymark    时间: 2011-10-12 19:52
引用丢失,编译一下代码看那里出问题
作者: 新缘依旧    时间: 2011-11-4 09:07
Option Compare Database

Private Sub 车间_AfterUpdate()
Me.操作者.Requery
End Sub

Private Sub Command45_Click()
On Error GoTo Err_Command45_Click


    Screen.PreviousControl.SetFocus
    DoCmd.DoMenuItem acFormBar, acEditMenu, 10, , acMenuVer70

Exit_Command45_Click:
    Exit Sub

Err_Command45_Click:
    MsgBox Err.Description
    Resume Exit_Command45_Click
   
End Sub


这是代码 你们看下 谢谢




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3