1、打开VB6.0，右键工具栏空白处，选择 部件，找到TabStrip部件，如图
2、将控件放到窗体中，右键选择properties，打开属性页，选择Tabs，Insert Tab可添加数据页面，对应的Caption编辑标签名，如图
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
