如何取消列表框的选择状态?

诚信为本　发表于：2016-05-12 22:17:04 　

复制

比如说一个列表框有十项内容,我选择了3项或者5项,那么这几项会是被选中状态,这个时候我想新建一个"取消选择"命令按钮,单击后被选中的内容恢复为未选中状态,这个命令的单击事件代码怎么写?

Top

煮江品茶发表于：2016-05-16 09:15:55

me.阁下的列表框.value=null

Top

诚信为本发表于：2016-05-16 21:04:56

试过了，取消不了

Top

leoyoung 发表于：2016-05-16 22:09:45

Dim varItem As Variant

Dim lst as ListBox

For Each varItem In lst.ItemsSelected '循环处理选中项

lst.Selected(varItem) = 0 '取消了对该项的选择

Top

诚信为本发表于：2016-05-16 22:25:47

按楼上代码测试，提示：编译错误用户定义类型未定义

Top

诚信为本发表于：2016-05-16 22:27:31

Private Sub Command30_Click()
Dim varItem As Variant
Dim lst As 预警原因
For Each varItem In lst.ItemsSelected '循环处理选中项
lst.Selected(varItem) = 0 '取消了对该项的选择
Next
End Sub

Top

诚信为本发表于：2016-05-16 23:10:41

煮江品茶的代码是对的，我将列表框属性做了一下修改，成功取消选择。

Top

总记录：6篇页次：1/1 9 1 :

Access交流中心

如何取消列表框的选择状态?