ACCESS窗体 原生的控件都是无法动态添加的,但是我通过添加一个Frame容器控件,实现了这个想法。
并且能够获取到动态添加控件的事件。
只是,动态添加的控件必须是UserForm控件了,一些属性、方法、事件稍有不同!
附 件:
点击下载此附件
图 示:
此方法参考【一指禅62】在《[原创] 动态加载控件与事件》的代码!
再次感谢【一指禅62】
2020年11月20日更新:
将动态控件功能,封装为类。简化操作代码!如下图:
附 件:
动态添加控件3.rar
目前提供控件: 【Label】【TextBox】 的几个常用事件支持。其他控件及其事件,需要大家自己添加代码扩展支持。
添加在类模块【ControlShell】
'===========事件接收对象============
Private WithEvents eLabel As MSForms.Label
Private WithEvents eTextBox As MSForms.TextBox
'===================================
以及其他几个标记{'**事件接收对象}的 地方