1. 设置页框的外观样式
(1)先在窗体上画出⼀个TabStrip对象;
(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.设计代码
在⽤户选择了标签后,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
二级VB Case "toolbar"
Frame1.Visible = False
Frame2.Visible = True
End Select
开学第一课观后感小学 End Sub
发布评论