Hallåjs,

hur bär man sig åt att få upp fler "flikar" i en tabstrip, och hur gör man för att bestämma vad som skall visas på resp flik.

/e:a

Hejsan
Lägg in tabstrip kontrollen i ditt fromulär. Högerklicka för att få fram propertiesrutan. Välj fliken "Tabs" Där kan du lägga till och ta bort flikar.

Därefter kan du tex använda frames som du lägger ovanpå varandra i tabstripen. I varje frame kan du lägga de kontroller osv som du vill använda.

Till sist får du i koden avgöra tex i en case sats vilken av tabbarna som användaren klickar på och visa eller dölja de olika "ramarna"

Lycka till :0)
Nettan

Man kan också göra det dynamiskt i RUN-TIME

TabStrip1.Tabs.Add , "Tab 1", "Tab 1"
TabStrip1.Tabs.Add , "Tab 2", "Tab 2"
TabStrip1.Tabs.Add , "Tab 3", "Tab 3"

eller ta bort

TabStrip1.Tabs.Remove ("Tab 3")

Notera det fina i att ange en key för din tab, det är enkelt att jobba med
den då. Du kan accessa tabben genom dess key istället för genom dess
index.

/peterh

hur gör man då för att visa rätt frame, om tex en ram skall visas när formen laddas och en annan när man klickar på en flik, hur gör man för att det verkligen skall se ut som en flik ligger överst?

/e:a

Om du skapar en kontrollarray som är 1 baserad av frames kan du använda dig av följand funktion:

Private Sub ShowFrame(TabStrip As TabStrip, Frames As Object)
Dim Frame As Frame
Dim Index As Integer
Index = TabStrip.SelectedItem.Index
For Each Frame In Frames
If Frame.Index = Index Then
Frame.Move TabStrip.ClientLeft, TabStrip.ClientTop, TabStrip.ClientWidth, TabStrip.ClientHeight
Frame.Visible = True
Else
Frame.Visible = False
End If
Next
End Sub

Här är ett litet exempel:
'Kontroller på formuläret
'TabStrip1
'Frames(1)
' Textbox1
'Frames(2)
' CheckBox1
'Frames(3)
' Label1

Private Sub Form_Load()
ShowFrame TabStrip1, Frame1
End Sub

Private Sub TabStrip1_Click()
ShowFrame TabStrip1, Frame1
End Sub

Private Sub TabStrip1_Click()
Select Case TabStrip1.SelectedItem
Case "1"
Frame1.Visible = True
Frame2.Visible = False
Case "2"
Frame2.Visible = True
Frame1.Visible = False
End Select
End Sub

Här har jag en Tabstrip med 2 tabbar och med två frames i.
Du måste även tala om vad tabbarna heter. Antingan i properties eller i runtime. I properties under fliken tabs finns en ruta Caption.

Jag har i ovanstående exempel angivit Caption = 1 för första fliken och 2 för andra fliken