我是Microsoft Access的新手,想创建带有复选框的ListBox(或ListView),但是我找不到任何本机的方法。
我的意图是显示值列表,并根据在窗体的ComboBox中选择的值来检查一些值。
请注意,我需要用于表单而不是表的控件(为此有“多值查找字段”)。(除了有一种方法可以创建带有仅包含多值列的表的子窗体,该表对ComboBox中的所选内容做出反应。)
“ Multi Select”属性设置为“ Simple”的普通列表框不会显示复选框。
我也看不到这里描述的“ ListStyle”属性。
也许可以某种方式在列表框中显示两列,其中第一列显示为复选框?
您可以使用该ListView
控件。它位于ActiveX控件下,全名是Microsoft ListView Control, version 6.0
。
它具有一组单独的属性:右键单击-> ListViewCtrl对象->属性,其中有该Checkboxes
属性。
要用数据填充listview,请参见例如ACC:填充ListView控件的示例函数
更多信息:使用ListView控件
编辑
为了舒适地使用Listview对象模型,请在Windows7 64位上将引用设置为Microsoft Windows Common Controls 6.0
= C:\Windows\SysWOW64\MSCOMCTL.OCX
。
编辑2
我将TreeView与复选框一起使用。每个属性Node
都有一个Checked
属性,该属性选中或取消选中其复选框。在Treeview有Nodes的地方,Listview有ListItems,但是它们也有一个Checked
属性。
Treeview的简化代码(无层次结构):
Dim oTree As TreeView
Dim oNode As Node
Dim RS As Recordset
Set oTree = Me.myTreeView.Object
oTree.Nodes.Clear
Set RS = DB.OpenRecordset("My query to fill the treeview")
Do While Not RS.EOF
Set oNode = oTree.Nodes.Add(key:=RS!foo, Text:=RS!bar)
oNode.Checked = (RS!someValue > 0)
RS.MoveNext
Loop
RS.Close
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句