VBA中如何使用ListBox控件呢?
ListBox 控件显示项目列表,从其中可以选择一项或多项。如果项目总数超过了可显示的项目数,就自动在 ListBox 控件上添加滚动条。
如果未选定项目,则 ListIndex 属性值是 -1。列表的第一项是 ListIndex 0,ListCount 属性值总是比最大的 ListIndex 值大 1。
语法
ListBox
说明
使用 AddItem 或者 RemoveItem 方法可以添加或者删除 ListBox 控件中的项目。对 List、ListCount 和 ListIndex 属性进行设置就可以访问 ListBox 中的项目。也可以在设计时使用 List 属性在列表中增加项目。
实例
?Dim?Entry,?I,?Msg?'?声明变量。 Msg?=?"Choose?OK?to?add?100?items?to?your?list?box." MsgBox?Msg?'?显示信息。 For?I?=?1?To?100?'?计数值从?1?到?100。Entry?=?"Entry?"?&?I?'?创建输入项。
List1.AddItem?Entry?'?添加该输入项。
Next?I Msg?=?"Choose?OK?to?remove?every?other?entry." MsgBox?Msg?'?显示信息。 For?I?=?1?To?50?'?确定如何List1.RemoveItem?I?'?每隔一项
Next?I?'?删除。 Msg?=?"Choose?OK?to?remove?all?items?from?the?list?box." MsgBox?Msg?'?显示信息。 List1.Clear?'?清除列表框。