如何得到列表多重选择的值？

bloom · 发表于 2005-11-20 07:39:00

代码：

Dim a As String

Dim i As Long

For i = 1 To Me.列表0.ItemsSelected.Count

a = a & Me.列表0.Column(0) & ";"

Next i

MsgBox "列表中选中了：" & a & " 共选中" & Me.列表0.ItemsSelected.Count & "项。"

tz-chf · 发表于 2005-11-20 18:24:00

图片无法缩放

wu8313 · 发表于 2005-11-21 04:52:00

论坛改版后，图片没法查看。

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

[Access本身] 如何得到列表多重选择的值？

本帖子中包含更多资源

群介绍
主题无相 (随机显示版	同地区群块其他地区)