TabControl 是 WinForms 常用容器控制項,本文示範常見動態操作:
Private Sub TabControl1_SelectedIndexChanged(...) Handles TabControl1.SelectedIndexChanged
lbMessage.Text = "目前顯示第 " & (TabControl1.SelectedIndex + 1) & " 頁"
End Sub
Private Sub btAdd_Click(...) Handles btAdd.Click
TabControl1.TabPages.Add(New TabPage("新頁"))
End Sub
Private Sub btDel_Click(...) Handles btDel.Click
TabControl1.TabPages.RemoveAt(TabControl1.SelectedIndex)
End Sub
Private Sub btLeft_Click(...) Handles btLeft.Click
Dim idx = TabControl1.SelectedIndex
If idx = 0 Then Return
Dim tab = TabControl1.SelectedTab
TabControl1.TabPages.Remove(tab)
TabControl1.TabPages.Insert(idx - 1, tab)
End Sub
TabPages 集合支援 Add、RemoveAt、Insert,配合 SelectedTab/SelectedIndex 即可實現豐富的動態頁籤管理。