Excel VBA编程复合框.docx

Excel VBA编程 复合框Excel VBA编程 复合框 复合框控件是将文字框和列表框的功能结合在一起的控件。用户可以通过在复合框控件中输入文本来选择选项，也可以从列表中选择选项，使用起来非常灵活、方便。 由于复合框控件组合了文字框和列表框控件的功能，所以复合框控件同时具备文字框和列表框的属性。此外，复合框还具有自身特有的一些属性。 l Style属性 用于设置复合框的不同类型。其属性值如表13-5所示。 表13-5 Style属性值 常量 fmStyleDropDownCombo fmStyleDropDownList 属性值 0 2 缺省值，下拉式复合框 下拉式列表 说明 下拉式复合框样式中包含一个下拉箭头利一个文字框。用户可直接在文字框中输入文本，或单击复合框右侧的下拉箭头打开选顶列表，选择其中选项加入到文字框。下拉式列表样式与下拉式复合框类似，但下拉式列表的文字框只能显示列表中被选择的选项内容，而不能进行任何编辑操作。 l ListRows属性 指定列表中显示的最大行数。 格式：object.ListRows = Long 其中，Object表示复合框控件对象，而Long是可选的。用来表示选择列表中的最大行数，默认值为8。如果列表中的选项数超出ListRows属性的值，则将在复合框的列表右侧出现一个滚动条，用户可以拖动滚动条来进行选择。 l Column属性 指定复选框中的一个或多个选项。 格式： object.Column(column,row)=Variant 其中，column和row为可选项，取值范围为0到1之间。Variant是指定加载到复合框的一个值、一列值或数组。 l Text属性 当选择样式为下拉式复合框时，可以通过Text属性来指定其文字框中的默认显示的字符串。 格式：object.Text = String 对于复合框，可用Text属性来更新该控件的值。如果Text的属性值与列表中的选项匹配，其ListIndex属性的值被设置成与Text匹配的选项；如果Text的属性值不与任何选项匹配，则ListIndex属性设置为-1。 例如，在复合框中显示“语文”、“数学”和“英语”选项，如图所示 图 复合框 Me.ComboBox1.AddItem "语文" Me.ComboBox1.AddItem "数学" Me.ComboBox1.AddItem "英语" 表框相同。 提 示 复合框常用事件主要有Click和Dblclick，与列表框相同。而复合框常用方法与列