问下各位,选项卡这个埪件是怎么 使用的啊?
问下各位,选项卡这个埪件是怎么 使用的啊?如不嫌弃,给歌QQ,问起来也方便些吧
建立Frame或Picture控件组,设置好属性,摆好位置.TabStrip建立好选项
Private Sub TabStrip1_Click()
Dim i As Integer
For i = 0 To TabStrip1.Tabs.Count - 1
If i = TabStrip1.SelectedItem.Index - 1 Then
Picture1(i).Visible = True
Else
Picture1(i).Visible = False
End If
Next
End Sub