乐筑天下

搜索
欢迎各位开发者和用户入驻本平台 尊重版权,从我做起,拒绝盗版,拒绝倒卖 签到、发布资源、邀请好友注册,可以获得银币 请注意保管好自己的密码,避免账户资金被盗
查看: 37|回复: 2

通用VBA问题

[复制链接]

170

主题

1424

帖子

8

银币

顶梁支柱

Rank: 50Rank: 50

铜币
2119
发表于 2008-8-19 06:51:19 | 显示全部楼层 |阅读模式
Im(尝试)编写一些模块级代码来对表单执行操作,并传递表单上的控件
在本演示中,Im使用帧,并将帧对象作为参数传递给sub,所有这些都在同一个模块内
我在获取(正确吗?)时遇到了问题框架的父对象。如果我明确地将父对象暗显为“0”;MSForms。用户表单;,或者只是;用户表单;,我无法获取表单的caption属性。但是,当我在DIM语句中意外拼错了对象变量时,该变量的非DIM版本现在将成为变量,它可以工作!(这样吧,选项显式!)
我不确定为什么这样做有效/无效。要复制这个,请输入一个表单和一个框架。使用框架的默认命名“0”;框架1;。然后将此子项放入表单模块:
&039;-----
子测试(objFrame As Frame)&nbsp MsgBox objFrame.Parent。标题#039;这可以在不获取对象的情况下工作&nbsp
&nbsp 将TMPMS窗体设置为MSForms。用户表单&nbsp 设置tmpForm=objFrame。母公司&nbsp'如果您更改“;tmpForm“;至;tmpMSForm“;正如所宣布的那样,它不起作用
&nbsp MsgBox tmpForm。字幕
结束子字幕
从userform调用sub。初始化事件,将帧作为参数传递:Private Sub UserForm\u initialize()
test Frame1
End Sub
请注意,两个消息框调用都有效。但是,在;测试“;子例程,如果您更改未声明的;tmpForm“;变量(Variant)
to“;tmpMSForm“;(声明为MsForms.Userform,甚至声明为“Userform”),caption属性返回为空
为什么会这样

回复

使用道具 举报

0

主题

7

帖子

4

银币

初来乍到

Rank: 1

铜币
8
发表于 2008-8-19 09:55:22 | 显示全部楼层
me.caption有用吗
我还认为,如果你要对其进行暗显,那么你会将其作为userform1进行暗显。你不应该't
回复

使用道具 举报

0

主题

7

帖子

2

银币

初来乍到

Rank: 1

铜币
7
发表于 2008-8-19 12:28:30 | 显示全部楼层
&燃气轮机&燃气轮机;me.caption有用吗
好吧,那就是作弊——因为所有这一切都将在一个代码模块中结束。为了孤立这个问题,我把一切都删掉了
&gt&燃气轮机;此外,我认为如果要将其暗显,您会将其作为userform1暗显,并且您不应该#039;我没有将其设置为userform1,因为表单的名称在运行时之前是未知的。基本上,这将最终成为一个代码模块,可以放入VBA项目中,通过;一个帧控件到模块中的子控件,其余代码将通过API调用自定义表单。
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

  • 微信公众平台

  • 扫描访问手机版

  • 点击图片下载手机App

QQ|关于我们|小黑屋|乐筑天下 繁体中文

GMT+8, 2025-7-4 02:24 , Processed in 1.670041 second(s), 58 queries .

© 2020-2025 乐筑天下

联系客服 关注微信 帮助中心 下载APP 返回顶部 返回列表