excel vba 窗体中listbox用法
或者有excel做的类似案例提供一个，同样感谢 展开
1、首先需要打开Excel的表格，如图所示，点击下面的文件1，鼠标右键单击选择查看代码。
2、然后就是进入代码页面，可以看到页面上现在的代码。
3、然后接下来就是需要用listbox用法，如图所示，输入Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)，回车。
4、最后，再返回到页面上，如图所示，双击一下表格就可以看到数字了，listbox用法成功。
1、在新工作表的Sheet1上点击右键
2、选择查看代码
3、点击右边倒三角，选择触发方式，如BeforeDoubleClick表示在双击鼠标左键时触发
4、点击候出现如下代码框架
5、输入以下语句：Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)意为将A1、B1单元格求和并放在C1单元格
6、由于A1,B1没有数据，所以C1为0
7、双击鼠标左键后就变了
1、RadListBoxSource.TransferMode = ListBoxTransferMode.Copy;传输数据是以COPY的形式。
2、RadListBoxSource.AllowReorder = true; 允许重新排序。
3、RadListBoxSource.SelectionMode = ListBoxSelectionMode.Multiple;允许多选。
4、RadListBoxDestination.AllowDelete = true; 选中项允许删除。
5、RadListBoxSource.AllowTransferOnDoubleClick = true;是否允许双击选中。
6、获取选中的人员。
1、RadListBoxSource.AllowTransfer = false;禁止转移。
2、RadListBoxSource.TransferMode = ListBoxTransferMode.Copy;传输数据是以COPY的形式。
3、RadListBoxSource.AllowReorder = true; 允许重新排序。
4、RadListBoxSource.SelectionMode = ListBoxSelectionMode.Multiple;允许多选。
5、RadListBoxDestination.AllowDelete = true; 选中项允许删除。
6、RadListBoxSource.AllowTransferOnDoubleClick = true;是否允许双击选中。
ListBox1.ListIndex
以下是excel自带的帮助信息，浅显易懂。
ListIndex 属性
参阅 示例 应用于 特性
指定当前选中的列表框或组合框条目。
语法
object.ListIndex [= Variant]
ListIndex 属性的语法包含以下成分：
成分
说明
object
必需。一个有效对象。
Variant
可选。控件中当前被选的条目。
说明
ListIndex 属性包含列表中被选行的索引。ListIndex 的取值范围为 －1 到列表总行数减
1（即，ListCount - 1）之间的数值。当用户没有选中行时，ListIndex 返回
-1。当用户在列表框或组合框中选中一行时，系统将设置 ListIndex 值。列表中第一行的 ListIndex 值是 0，第二行的
ListIndex 值是 1，依此类推。
注意 如果用 MultiSelect 属性创建一个允许多重选择的列表框，那么列表框的
Selected 属性（而不是 ListIndex 属性）将标识被选中的行。Selected 属性是一个数组，其中值的个数与列表框中的行数相同。对于列表框中的每一行，如果该行被选中，则
Selected 为 True，否则为 False。在一个允许多重选择的列表框中，ListIndex
返回具有焦点行的索引，而不论当前该行是否被选中。
将 BoundColumn 属性的值设置为 0，使组合框或列表框中的 ListIndex 值也可使用。如果
BoundColumn 为 0，绑定到组合框或列表框的支持数据源将包含与 ListIndex 相同的列表索引值。
