|
转贴(电脑报):VBA开发实用指南(14) (3)由于从前述知识点可得向导程序本质为模板文件，因此开发者可直接打开Word已提供的向导程序(如“实用文体向导”等)，然后通过工程资源管理器导出其界面窗体，然后在此基础上进行参考和修改，可大大提高编制的效率。 (4)Controls集合：窗体的Controls集合代表其包含的全部控件。Controls集合中的每个控件均有唯一的索引，也可通过控件名称来引用。在向导程序中，为有效地控制功能和外观均类似的控件(如切换按钮)，可通过名称引用来枚举访问窗体的Controls集合，即可控制这些控件。 (5)多页控件：多页控件(MultiPage)是Pages集合的容器，每个多页控件均包含一个或多个Page对象，其常用属性和方法如下： Value属性：为多页控件默认属性，返回当前活动页面的索引号，从“0”开始编号，依此类推。 Style属性：用于设置多页控件标签的显示风格，在向导中建议设置为“2”(即不显示表头)。 (6)Page对象：该对象代表多页控件的页面。每个 Page对象均可放置不同的控件，以实现多界面切换的效果，第一个Page对象默认名称为“Page1”，其常用属性和方法如下： Picture属性：用于设置页面的背景图片。 PictureTiling属性：用于设置是否平铺图片。 PictureSizeMode属性：用于设置显示背景图片的方式。 (三)程序实现步骤
1.创建向导所需的自动图文集 通过前述内容可得创建向导所需的自动图文集是关键的步骤，因此首先在编辑界面中输入相关的文字，然后在需插入内容的位置添加书签，最后选择全部内容，以“hk”命名并保存于模板的自动图文集中。如图7所示： 2.编制窗体 在VBA编辑器的工程资源管理器中添加窗体，放置多页控件、标签、文本框、列表框等控件(也可采用前述的导入并修改的方法来设计窗体)，由于该窗体使用的控件较多，限于篇幅，不在逐一介绍，可按效果图自行设计，本文仅对一些需在代码中使用的控件进行介绍。 首先切换至多页控件的第二页，该页面中需编程的控件位置和名称如图8所示： 如图8所示，其中“frmHKWiz”为用户窗体，“Page1”为多页控件的页面对象，“txtfsz”和“txtjsz”均为文本框控件，“shpMap0”至“shpMap3”、“lblMap0”至“lblMap3”均为Label控件，“lstjr”为列表框控件。切换至多页控件的第三页，该页面中需编程的控件位置和名称如图9所示： 如图9所示，其中“Page2”为多页控件的页面对象，“shpChartPath”为标签控件，“txthc”为文本框控件，“cmdCancel”、“cmdBack”、“cmdNext”和“cmdFinish”均为命令按钮控件。 窗体界面设计完毕后，切换至代码编辑窗口，首先输入常量声明，代码如下所示： '代表页面数量 Const P_Count = "3" '标签名称的常量 Const Const_LBL = "lblMap" '标签名称的常量 Const Const_SHP = "shpMap" 然后输入公共变量，代码如下所示： '用于保存当前页面编号的变量 Dim indeXPanel As Integer 输入自定义的过程代码，如下所示： '初始化控件的过程 Private Sub init_Controls() With lstjr .AddItem "圣诞节" .AddItem "中秋节" .AddItem "国庆节"
| 
