借用一张网图说明需求

实现TabControl 选项卡首个标签缩进的方法-LMLPHP

在网上找了一圈,没有找到直接通过API或者重绘TabControl 的解决方法,最后灵机一动想到了一个折(tou)中(lan)的解决办法

 Tab1.TabPages.Clear()
Tab1.SizeMode = TabSizeMode.Fixed
Tab1.TabPages.Add("")
Tab1.TabPages.Add("标签一")
Tab1.TabPages.Add("标签二")
Tab1.SelectedIndex = AddHandler Tab1.Selecting, Sub(sender As Object, ByVal e As TabControlCancelEventArgs)
If e.TabPageIndex < Then
e.Cancel = True
End If
End Sub

当然要完美善后还是需要用户自绘标签,使第一个标签与背景色一致,这部分就不赘述了。

看不见就当不存在吧 : )

实现TabControl 选项卡首个标签缩进的方法-LMLPHP

05-20 14:31