Für dieses Beispiel brauchen Sie eine Form, ein Tabstrip, zwei Frames. Erstellen Sie ein Steuerelement Frame1 mit dem Index 0, das zweite mit dem Index 1.
Erstellen Sie zwei Tabs im Tabstrip, Caption nach Ihrem Belieben.
Private Sub TabStrip1_Click()
Frame1(TabStrip1.SelectedItem.Index - 1).ZOrder 0
End Sub
Private Sub Form_Load()
Dim i As Integer
For i = 0 To 1 ' Anzahl der Frames (-1) angeben!
' Frames werden ausgerichtet:
Frame1(i).Move TabStrip1.ClientLeft, TabStrip1.ClientTop, _
TabStrip1.ClientWidth, TabStrip1.ClientHeight
Next i
' Frame Nummer 1 wird als erstes angezeigt.
Frame1(0).ZOrder 0
End Sub
