刷新/重新查询组合框问题

Posted

技术标签:

【中文标题】刷新/重新查询组合框问题【英文标题】:Refresh/Requery Combobox problems 【发布时间】:2013-01-23 02:53:49 【问题描述】:

下午,

我在 ComboBox 所在的表单打开时更新它时遇到问题。

表单打开时我的数据会发生变化,因此需要刷新组合框,但我不知道如何刷新。似乎唯一的方法是关闭然后重新打开表单,但我不是真的

ComboBox 的原始源是一个简单选择查询。我尝试过使用 requery,但它似乎没有做任何事情。

Sub ComboBox_GotFocus()

Me.ComboBox.Requery

End Sub

有什么想法吗?

干杯, 迈克尔

【问题讨论】:

【参考方案1】:

清空并重新填充组合框。 最简单的是:

sSQL_Select = "SELECT * FROM SOMETABLE" 

Me.lstListBox.RowSource = "" 
Me.lstListBox.RowSource = sSQL_Select

除了使用 SQL 查询之外,您还可以向列表框显式添加值。 在此您可以执行以下操作:

Dim iList_Cnt As Integer
Dim iCnt As Integer

iList_Cnt = Me![lstListBox].ListCount

For iCnt = 0 To iList_Cnt - 1
    Me![lstListBox].RemoveItem 0
Next

接着重新填充列表框:

lstListbox.AddItem("Smtg_Col1;Smtg_Col2;Smtg_Col3")

循环组合框以添加多行。

【讨论】:

完美,使用了第一个解决方案,感谢您提供添加/删除值的提示!

以上是关于刷新/重新查询组合框问题的主要内容,如果未能解决你的问题,请参考以下文章

更新另一个组合框后的组合框重新查询

MS Access:组合框重新查询

如何根据用户类型用相似的记录重新填充组合框

组合框选项的部分刷新

MS 访问组合框

修改 ItemsSource ObservableCollection 后如何刷新组合框