2009-09-24 39 views

回答

1

假设这是一个WPF应用程序,确保每个TabItem的有一个名称。

然后这只是一个检查问题。

if tabItem1.IsSelected = true then 
    ' Do Something 
else if tabItem2.IsSelected = true then 
    ' Do Something 
end if 
+1

是啊,我这是怎么盘算如何做到这一点,但有没有委员呼吁IsSelected或选择,我想你必须使用SelectedTab,有点丑,但它的工作原理。 – 2009-09-24 14:37:44

+1

做了更多的lokoing到这个,显然IsSelected只适用于WPF TabItem类。 WinForms不支持IsSelected属性。 – 2009-09-24 15:06:35

2

如果您使用的.Net 3.5,你可以,如果你想创建一个IsSelected方法扩展方法:

Public Module TabControlExtensions 
    <Extension()> _ 
    Public Function IsSelected(ByVal tabPage As TabPage) As Boolean 
     Dim tabControl = CType(tabPage.Parent, TabControl) 
     Return (tabControl.SelectedTab Is tabPage) 
    End Function 
End Module 
5
Private Sub TabControl_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabControl.SelectedIndexChanged 
    If TabControl.SelectedTab Is tabMyTab Then 
     ' do whatever... 
    End If 
End Sub 
+0

为我操控密切形式事件! – fedeteka 2016-10-10 10:25:38

0

也可以做到以下几点:

Dim TabName As String 

TabName = YourTabControl.SelectedTab.Name 

If TabName.Contains("YourTabName") Then 
    ' Do something 
End If 
8

使用该标签的“ENTER EVENT” 例如。

Private Sub TabName_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles TabName.Enter 
     MsgBox("me the tab selected") 
     'or do whattever u like 
    End Sub 
0

试试这个..

这是当选择 那么就会出现在每个选项卡

第一渐变的功能如何修改每个选项卡|第二渐变|

Private Sub TabControlAction(ByVal sender As Object, ByVal e As System.EventArgs) Handles nameoftab.Click 

     If nameoftab.SelectedTab.Text = "Second Grading" Then 
      Msgbox("Second Grading is Selected") 
''Place whatever your want 

     Else 
      Msgbox("First Grading is Selected") 
''Place whatever your want 
     End If 

    End Sub 

您可以使用但如果ELSEIF else语句。

这个发现适合我。

1

尝试使用TabPages集合编辑器为每个单独的选项卡设置“TAG”标签。设置每个标签代表标签序列号(从1或0或任何适合)

Private Sub TabControl1_Click(sender As Object, e As System.EventArgs) Handles TabControl1.Click 

    Dim ActiveTabNumber as Integer = TabControl1.SelectedTab.Tag 

End Sub 
0
TabControl1_Click: 
    If TabControl1.SelectedIndex = 0 Then 
     ' Do Something  
    ElseIf TabControl1.SelectedIndex = 1 Then 
     ' Do Something 
    End If 
End Sub 
+2

嗨,欢迎来到Stack overflow!看起来像一个很好的答案,并希望它很好地解决了OP的问题(我不知道,我不是一个VB程序员)......我只是觉得我应该说,通常最好扩展你的答案并解释/为什么它解决了这个问题。我们得到了很多新手 - 或者像我这样擅长编程的人,但不是用这种语言......而一些解释可以帮助我们更好地理解代码片段,并从中学习一些东西。 – 2014-06-17 01:37:11

相关问题