Access列表框添加值,删除列表框的值

2017-12-22 11:56:00
黄善超
原创
228

有网友在论坛中发帖《求助!关于组合框与 》提及到往列表框里添加值,同时可以删除添加的值的问题。

如下图所示。有两个联动列表框,展示城市与景点信息。希望能在“景点”组合框里双击需要的内容后,把所选的景点直接复制到“所选景点”列表框里,同时在列表框也可以实现删除已选择的景点项目


那么我们这里用到两个列表框的属性AddItem和RemoveItem。双击“景点”添加所选到列表框,双击“所选景点”从列表框移除

Private Sub 景点_DblClick(Cancel As Integer)
    
    Me.所选景点.AddItem 景点
    Me.所选景点.Requery
End Sub


Private Sub 所选景点_DblClick(Cancel As Integer)
     Me.所选景点.RemoveItem (所选景点)
End Sub



效果如图:



注意:列表框的属性“行来源类型 ”必须为“值列表”



    分享