以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  我想问下并列窗口如何设置窗口切换时能触发事件？  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=105989)
--  作者：chen3728060
--  发布时间：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(并列窗口的名字)代码又放哪里？

 
--  作者：有点甜
--  发布时间：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编辑过]