實現TabControl 選項卡首個標籤縮進的方法

借用一張網圖說明需求

在網上找了一圈,沒有找到直接通過API或者重繪TabControl 的解決方法,最後靈機一動想到了一個折(tou)中(lan)的解決辦法

 1 Tab1.TabPages.Clear()
 2 Tab1.SizeMode = TabSizeMode.Fixed
 3 Tab1.TabPages.Add("")
 4 Tab1.TabPages.Add("標籤一")
 5 Tab1.TabPages.Add("標籤二")
 6 Tab1.SelectedIndex = 1
 7 
 8 AddHandler Tab1.Selecting, Sub(sender As Object, ByVal e As TabControlCancelEventArgs)
 9                                 If e.TabPageIndex < 1 Then
10                                     e.Cancel = True
11                                 End If
12                            End Sub

當然要完美善後還是需要用戶自繪標籤,使第一個標籤與背景色一致,這部分就不贅述了。

看不見就當不存在吧 : )

 

 

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章