vba - 如何修复 AllowEdits 按钮上的“找不到方法或数据成员”
问题描述
我正在尝试制作一个按钮来锁定/解锁表单和子表单中的编辑和添加。
在我的主表单 CONSULTAS PEDIDOS 中,我有两个子表单 CONSULTAS PRODUCTOS y LOTES。当我单击 BLOQUEAR 按钮时,我想根据标题文本打开/关闭 CONSULTAS PEDIDOS 和 CONSULTAS PRODUCTOS 中的 AllowEdits 和 AllowAditions 属性,但我想继续在 LOTES 子表单中编辑和添加记录。
我试过这段代码:
Private Sub bloquear_Click()
With Me.bloquear
If .Caption = "Unlock" Then
Me.AllowAdditions = True
Me.AllowEdits = True
Me.CONSULTA_PRODUCTOS.AllowAdditions = True
Me.CONSULTA_PRODUCTOS.AllowEdits = True
.Caption = "Lock"
Else
Me.AllowAdditions = False
Me.AllowEdits = False
Me.CONSULTA_PRODUCTOS.AllowAdditions = False
Me.CONSULTA_PRODUCTOS.AllowEdits = False
.Caption = "Unlock"
Me.Refresh
End If
End With
End Sub
我只使用主表单 CONSULTAS PEDIDOS 尝试了代码并且它可以工作,但是当我添加 CONSULTAS PRODUCTOS 子句时,Access 报告我The expression On Load you enter as the event property setting 产生以下错误: Method or data member not found。我不知道我做错了什么。我是一个绝对的初学者编写代码。
提前致谢。
解决方案
需要参考 Form 类跟随子表单容器控件名称,因为这些是表单对象的属性,而不是容器控件。
Me.CONSULTA_PRODUCTOS.Form.AllowAdditions = False
Me.CONSULTA_PRODUCTOS.Form.AllowEdits = False
推荐阅读
- flutter - 在集成测试期间意外处置小部件
- ruby-on-rails - 在本地运行任务时未创建文件
- sql - 使用 COUNT() 更新容量
- node.js - Promise.all 中的 Node.js 错误“[INTERNAL ERROR] TypeError: (intermediate value) is not iterable”
- ios - TypeError:无法读取未定义的属性“init”
- draw.io - Draw.io 内嵌文档配置参数
- active-directory - Rundeck ldap 连接以 NullPointerException 结束
- java - 设置自定义字体以设置单词 java 不起作用
- php - Symfony 5 - 基于浏览器语言的网站翻译后重定向
- c++ - 如何为其成员为字符串类型的结构变量分配内存