Fall auswählen, um aktive TabPage zu behandeln

Question

Ein Programm mit einem Formular und einem TabControl. Ich brauche zu handhaben, was passiert, wenn der Benutzer das Formular schließen nach dem aktiven TabControlPage

mit Bei der Arbeit - dann so

If PanelChooserTabControl.SelectedTab Is SelectionTabPage Then 
    'What I want 
End If 

If PanelChooserTabControl.SelectedTab Is EditionTabPage Then 
    'The user can´t leave 
    e.Cancel = True 
End If 

Aber ich will mehr TabPages haben, und ich möchte den Code einfach machen mit Select Case

Dim TabPageActive As String = PanelChooserTabControl.SelectedTab.ToString 
Select Case TabPageActive 
    Case "TabPage:{SelectionTabPage}" 
     'What I want 
    Case "EditionTabPage" 
     'What I want 
End Select 

Aber die TabPageActive Variable wird mit so etwas wie TabPage geladen: {SelectionTabPage}

und nicht nur "SelectionTabPage". Auch die Verwendung von TabPage: {SelectionTabPage} als Case-Variable (wie der Beispielcode) funktioniert nicht.

Muss ich eine weitere Zeichenfolgenkonvertierung durchführen oder trimmen?

Answer 1

können Sie versuchen, so etwas wie:

Select Case True 
    Case PanelChooserTabControl.SelectedTab Is SelectionTabPage 
    Case PanelChooserTabControl.SelectedTab Is EditionTabPage 
    ... 
End Select 

oder auf tabpage Indexänderung speichern als Enum der Seite und benutzen Sie diese Enumeration im Fall.