二级VB基础教程:8.2多选项卡对话框——页框(TabStrip)
1. 设置页框的外观样式
　（1）先在窗体上画出⼀个TabStrip对象；
　（2）右击该对象，从快捷菜单中选择“属性”；
　（3）在TabStrip属性窗⼝⾥选择通⽤（General）标签，在样式（Style）列表框⾥选择样式；
　（4）在TabStrip属性窗⼝⾥选择选项卡（Tabs）标签，在标题（Caption）框⾥输⼊标题和关键字；
　（5）如果需要的话，在⼯具提⽰⽂本（ToolTipText）框⾥输⼊提⽰信息；
　（6）在TabStrip属性窗⼝⾥选择字体（Font）标签，设置标题的字体（可以直接采⽤默认值）。
  2．增减标签总数
　在TabStrip属性窗⼝⾥选择选项卡标签，单击插⼊选项卡按钮增加标签，单击删除选项卡按钮删除标签。
  3．在TabStrip上显⽰图形
  1) 在窗体⾥拖⼊⼀个图象列表（ImageList）控件；
  2) 在此对象上右击，选择属性，打开属性页窗⼝；
  3) 选择图象标签，单击插⼊图⽚按钮，在选定图⽚对话框⾥选择想使⽤的位图或图标，然后单击打开按钮；为每个想添加图形的选项卡重复此步；
  4) 单击确定按钮， ImageList⾥就存储了需要的图⽚。
  5) 选择TabStrip，进⼊TabStrip属性窗⼝并选择通⽤标签，在图象列表框⾥选择ImageList1；
  6) 选择选项卡标签，单击紧挨索引框的向左或向右箭头以选择⼀个Tab序号。在图象框⾥输⼊⼀个数，输⼊为1，则显⽰刚才ImageList控件⾥的第⼀个图形，输⼊为2，则显⽰刚才ImageList控件⾥的第⼆个图形，单击确定按钮完成。
  4．在TabStrip上放置其它控件
　在窗体上象添加普通控件⼀样，把每⼀页需要的控件添上，控件不⽌⼀个时，应该⽤Frame来分组，注意：除了默认的第⼀页上的Frame控件外，其他所有Frame的Visible属性都应该设为假。
  5．设计代码
二级VB
在⽤户选择了标签后，TabStrip要求编写代码来显⽰或隐藏控件。可⽤类似下⾯的代码来识别⽤户在哪⼀个项⽬上单击。
  Private Sub TabStrip1_Click()
    Select Case TabStrip1.SelectedItem.key
      　Case 1
      　Case 2
            ……
    End Select
  End Sub
  例： Private Sub TabStrip1_Click()
        Select Case TabStrip1.SelectedItem.Key
            Case "statubar"
                  Frame2.Visible = False
                  Frame1.Visible = True
            Case "toolbar"
                  Frame1.Visible = False
                  Frame2.Visible = True
      　End Select
    End Sub

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。