VB中ActiveX控件的使用.docVIP

第八章????????? VB中ActiveX控件的使用 8．1? 概述 ???? 这里的ActiveX控件是指VB标准工具箱里没有的控件，用时需从“工程”菜单里选择“部件…”（或右键单击工具箱，从快捷菜单中选择“部件…”），从部件窗口里勾上需要的控件。 常用ActiveX控件 ActiveX控件 ActiveX部件 文件名 TabStrip? ????页框 Windows通用控件 Microsoft? Windows Common Controls 6.0 ?路径： Windows\system\ Mscomctl.ocx Toolbar?? ????工具栏 StatusBar? ???状态栏 ProgressBar?? 进程条 TreeView??? 分层显示 ListView?? ??排列显示 ImageList? ??图象列表 Slider???? ???滑块 ImageCombo? 图象组合框 CommonDialog 通用对话框 Microsoft? Common? Dialog Control 6.0? Comdlg32.ocx MMControl1? 多媒体 Microsoft? Multimedia Control 6.0 Mci32.ocx MediaPlayer? 媒体播放器 Microsoft? Media Player Msdxm.ocx 8.1? ??多选项卡对话框——页框（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．设计代码 ?? ?在用户选择了标签后，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 8.2? ??StatusBar）和工具栏（ToolBar） 1． 　　StatusBar Panel（窗格） 对象组成，最多能被分成