关于SSTAB控件的应用

wzw2174 发布于 2016-07-31 15:16， 1052 次点击

我有个SSTAB控件，上面分成TAB0~10
想实现的是双击一个TAB2就关闭TAB2，双击一个TAB3就关闭TAB3
求指导

2 回复

xiangyue05102016-08-01 08:45

现在的机器上没装VB，用Excel的VBA实现的 Tabstrip

程序代码：

Private Sub TabStrip1_DblClick(ByVal Index As Long, ByVal Cancel As MSForms.ReturnBoolean)

TabStrip1.Tabs(Index).Visible = False
End Sub

ZHRXJR2016-08-08 00:38

程序代码：

Private Sub Form_Load()
SSTab1.Tab = 0 '启动默认打开 Tab 0 选项卡
End Sub

Private Sub SSTab1_DblClick()
SSTab1.Tab = 0 '双击后，关闭双击选项卡，打开 Tab 0 选项卡
End Sub