以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  并列窗口切换获取表名称  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=150406)

--  作者:kenmen
--  发布时间:2020/5/29 9:44: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


与我想的类似,但是取的值不一样,不晓得该怎么改呢?


--  作者:有点蓝
--  发布时间:2020/5/29 9:53:00
--  
Public Sub TabControl_SelectedIndexChanged(sender As Object, e As EventArgs)
MessageBox.Show(sender.SelectedTab.Name & "|" & sender.SelectedTab.Text)
For Each f As WinForm.Form In Forms
    If f.Opened AndAlso f.Text = sender.SelectedTab.Text Then
        MessageBox.Show(f.TableName)
        Exit For
    End If
Next
End Sub

--  作者:kenmen
--  发布时间:2020/5/29 10:08:00
--  
可以了!非常感謝!!!