VB中TabStrip控件如何添加使用

1、打开VB6.0，右键工具栏空白处，选择 部件，找到TabStrip部件，如图

3、代码TabStrip1.SelectedItem.Index对应不同的页面，点击相应标签，相应的frame显示，就可实现不同页面的转换劲忧商偌了Private Sub TabStrip1_Click() Dim Index As Integer a = TabStrip1.SelectedItem.Index If a = 1 Then Picture1.Visible = True Frame1.Visible = False ElseIf a = 2 Then Frame1.Visible = True Picture1.Visible = False end ifend sub