Jak sprawdzić, która karta jest zaznaczona w VB.net TabControl

Question

Mam TabControl z dwiema kartami i zastanawiałem się, jaki jest najlepszy sposób przetestowania, która karta jest aktualnie wyświetlana? Nie jestem pewien, dlaczego ja nie mogę zrozumieć ten jeden ...

Answer 1

TabControl.SelectedTab

Answer 2

Zakładając, że jest to aplikacja WPF, upewnij się, że każdy TabItem ma nazwę.

To tylko kwestia sprawdzenia.

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

Answer 3

TabControl.SelectedTab. 

Oto the link.

Answer 4

Jeśli używasz .NET 3.5 można utworzyć metodę IsSelected jako metodę rozszerzenia, jeśli chcesz:

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 

Answer 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 

Answer 6

można również wykonać następujące czynności:

Dim TabName As String 

TabName = YourTabControl.SelectedTab.Name 

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

Answer 7

że wykorzystanie zakładka "ENTER EVENT" np.

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 

Answer 8

Try This ..

to jak zmodyfikować każdej zakładce gdy wybrany wtedy nie będzie funkcją każdej karcie

Pierwszy Grading | Druga Klasa |

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 

Możesz użyć instrukcji else else else.

to znalezisko działa dla mnie.

Answer 9

Spróbuj ustawić propozycję "TAG" dla każdej pojedynczej karty za pomocą edytora kolekcji TabPages. Ustaw każdy tag do liczby reprezentującej sekwencję Tab (rozpoczynając od 1 lub 0 lub cokolwiek, aby dostosować)

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

    Dim ActiveTabNumber as Integer = TabControl1.SelectedTab.Tag 

End Sub 

Answer 10

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