Foxtable(狐表)用户栏目专家坐堂 → [求助]Label控件如何引用添加点击事件


  共有4396人关注过本帖树形打印复制链接

主题:[求助]Label控件如何引用添加点击事件

帅哥哟,离线,有人找我吗?
haotinghua
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:459 积分:3842 威望:0 精华:0 注册:2016/8/21 3:43:00
[求助]Label控件如何引用添加点击事件  发帖心情 Post By:2022/2/9 7:55:00 [只看该作者]

Label控件本身有点击事件属性
但是在其余地方想通过代码控制点击,对应属性应该怎么写呢
Dim la As WinForm.Label = Forms("XXX").Controls("Label1")
la.????  如何添加点击事件

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/9 8:36:00 [只看该作者]

没有这种用法,只能是把代码整个复制到其它需要使用的地方。或者是把代码放到自定义函数里,给需要的地方调用

 回到顶部
帅哥哟,离线,有人找我吗?
xndd
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:二尾狐 帖子:537 积分:4465 威望:0 精华:0 注册:2014/11/26 15:23:00
  发帖心情 Post By:2022/2/9 8:52:00 [只看该作者]

PerformClick

模拟单击此按钮。

示例

假定窗口有两个按钮,单击按钮1执行A操作,单击按钮2执行A、B两项操作,我们可以将按钮2的Click事件代码设置为:

Dim btn As WinForm.Button = Forms("窗口1").Controls("Button1")
btn.PerformClick()
'B操作代码

这样就无需重复在两个按钮中编写A操作的代码,只需在按钮1中编写一次即可。


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111390 积分:567014 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/2/9 8:55:00 [只看该作者]

Label控件是没有PerformClick的

 回到顶部