如何获取当前激活的子窗体控件的名称
- 2021-01-03 10:03:00
- zstmtony 原创
- 16855
MsgBox Screen.ActiveControl.Name '当前获得焦点的子窗体控件里面的控件的名称
MsgBox Screen.ActiveForm.Name '当前激活的窗体的名称 （主窗体）
MsgBox Screen.ActiveControl.Parent.Name '当前激活的子窗体的名称 （子窗体）
MsgBox Screen.ActiveControl.Parent.Parent.Name '当前激活的子窗体的父容器名称 （主窗体）
Dim ctr As Control
For Each ctr In Screen.ActiveControl.Parent.Parent
If TypeOf ctr Is SubForm Then
MsgBox ctr.Name '子窗体控件的名称 （非子窗体窗体）
End If
Next
更简单的方法 获取当前激活的子窗体控件的名称
Dim ctr As Control
For Each ctr In Screen.ActiveForm.Controls
If TypeOf ctr Is SubForm Then
MsgBox ctr.Name '子窗体控件的名称
'如果希望判断 是否焦点所在的子窗体，可以再判断 if ctr.Form.Name=Screen.ActiveControl.Parent.Name Then 相等就是激活的子窗体
End If
Next
Access数据库自身
- office课程播放地址及课程明细
- Excel Word PPT Access VBA等Office技巧学习平台
- 将( .accdb) 文件格式数据库转换为早期版本(.mdb)的文件格式
- 将早期的数据库文件格式（.mdb）转换为 （.accdb） 文件格式
- KB5002984：配置 Jet Red Database Engine 数据库引擎和访问连接引擎以阻止对远程数据库的访问（remote table)
- Access 365 /Access 2019 数据库中哪些函数功能和属性被沙箱模式阻止（如未启动宏时）
- Access Runtime(运行时)最全的下载(2007 2010 2013 2016 2019 Access 365)
Access Activex第三方控件
- Activex控件或Dll 在某些电脑无法正常注册的解决办法(regsvr32注册时卡住）
- office使用部分控件时提示“您没有使用该ActiveX控件许可的问题”的解决方法
- RTF文件（富文本格式）的一些解析
- Access树控件（treeview) 64位Office下出现横向滚动条不会自动定位的解决办法
- Access中国树控件 在win10电脑 节点行间距太小的解决办法
- EXCEL 2019 64位版（Office 2019 64位）早就支持64位Treeview 树控件 ListView列表等64位MSCOMMCTL.OCX控件下载
- VBA或VB6调用WebService（直接Post方式）并解析返回的XML
Access ADP Sql Server等
- 早期PB程序连接Sqlserver出现错误
- MMC 不能打开文件C:/Program Files/Microsoft SQL Server/80/Tools/Binn/SQL Server Enterprise Manager.MSC 可能是由于文件不存在，不是一个MMC控制台，或者用后来的MMC版
- sql server连接不了的解决办法
- localhost与127.0.0.1区别
- Roych的浅谈数据库开发系列（Sql Server)
- sqlserver 自动备份对备份目录没有存取权限的解决办法
- 安装Sql server 2005 express 和SQLServer2005 Express版企业管理器 SQLServer2005_SSMSEE
文章分类
联系我们
| 联系人： | 王先生 |
|---|---|
| Email： | 18449932@qq.com |
| QQ： | 18449932 |
| 微博： | officecn01 |
