以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 选择TabControl1页面执行代码 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98019) |
-- 作者:yangwenghd -- 发布时间:2017/3/22 17:33:00 -- 选择TabControl1页面执行代码 怎么当点击TabControl1页面1 后执行 下面的代码啊 感谢 感谢 Forms("听想练习窗口").Controls("Button1").PerformClick
|
-- 作者:有点蓝 -- 发布时间:2017/3/22 17:48:00 -- 参考:http://www.foxtable.com/webhelp/scr/0833.htm
|
-- 作者:yangwenghd -- 发布时间:2017/4/24 8:14:00 -- If .Value IsNot Nothing Then If Forms("主窗口").Controls("TabControl2").SelectedIndex = 0 End If Dim obja As GlobalKeyDown = GlobalKeyDown.getInstance RegisterHotKey(obja.Handle, 120, KeyModifiers.none, 32) \' 快捷键大小写+空格 End If 能帮忙看看这个吗?选择 TabControl2 页面后 执行下面代码? 感谢 感谢了
|
-- 作者:有点色 -- 发布时间:2017/4/24 8:42:00 -- 这段代码没必要在点击的时候写,你可以直接写在AfterLoad事件
Dim obja As GlobalKeyDown = GlobalKeyDown.getInstance
处理快捷键的时候,你判断当前控件是不是TabControl2就行了。 |
-- 作者:yangwenghd -- 发布时间:2017/4/24 8:53:00 -- 是的 感谢 感谢 判断 TabControl2在不同的页面执行不同的代码,比如 在TabControl2 页面1 执行楼上的代码,如果点击TabControl2页面2就执行其他的代码 可以吗 感谢 感谢 |
-- 作者:有点色 -- 发布时间:2017/4/24 9:00:00 -- SelectedIndexChanged 事件写代码
If e.Sender.SelectedIndex = 0 Then
ElseIf e.Sender.SelectedIndex = 1 Then
End If |
-- 作者:yangwenghd -- 发布时间:2017/4/24 16:37:00 -- 谢谢 可以了 |