Foxtable(狐表)用户栏目专家坐堂 → 我想问下并列窗口如何设置窗口切换时能触发事件?


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

主题:我想问下并列窗口如何设置窗口切换时能触发事件?

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


加好友 发短信
等级:二尾狐 帖子:388 积分:5098 威望:0 精华:0 注册:2013/11/2 0:01:00
我想问下并列窗口如何设置窗口切换时能触发事件?  发帖心情 Post By:2017/8/30 16:24:00 [只看该作者]

我有几个并列窗口,他们的所有者表都是一样的,我需要并列窗口切换时,能messagebox.show(并列窗口的名字),请问这个怎么做到?

 

我爬了一下帖子,看到这样的

 

全局事件

 

Public Sub TabControl_SelectedIndexChanged(sender As Object, e As EventArgs)
   MessageBox.Show(sender.SelectedTab.Name & "|" & sender.SelectedTab.Text)
End Sub

 

绑定事件

 

Dim tab As C1Command.C1DockingTab = Forms("窗口1").panel.parent.parent

addhandler tab.SelectedIndexChanged, addressof TabControl_SelectedIndexChanged

 

 

但是不知道这些代码放哪里?还有我的messagebox.show(并列窗口的名字)代码又放哪里?

 


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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/8/30 16:33:00 [只看该作者]

全局代码

 

Public Sub TabControl_SelectedIndexChanged(sender As Object, e As EventArgs)
   MessageBox.Show(sender.SelectedTab.Name & "|" & sender.SelectedTab.Text)

   msgbox(sender.SelectedTab.Controls(0).name)
End Sub

 

并列窗口AfterLoad事件

 

Dim tab As C1Command.C1DockingTab = e.Form.panel.parent.parent

Removehandler tab.SelectedIndexChanged, addressof TabControl_SelectedIndexChanged

addhandler tab.SelectedIndexChanged, addressof TabControl_SelectedIndexChanged

[此贴子已经被作者于2017/8/30 16:33:13编辑过]

 回到顶部