标签:tabs div sel span style rgs item end add
借用一张网图说明需求
在网上找了一圈,没有找到直接通过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
当然要完美善后还是需要用户自绘标签,使第一个标签与背景色一致,这部分就不赘述了。
看不见就当不存在吧 : )
标签:tabs div sel span style rgs item end add
原文地址:https://www.cnblogs.com/towerbit/p/11532620.html