如何以编程方式 select 组合框中的值？

Question

大家好。我有一个快速的问题。我有一个 openargs 值，我正尝试使用它从另一个表单显示在 return 上的组合框 (cmbMemberName) 中。组合框填充带下划线的子表单。我似乎无法获得正确的方法。我不能使用记录源，因为它会过滤掉其余的记录。 Rem：我只想关注更新的记录并在 return 时加载到组合框中。这是我尝试的最后一种方法。

If Nz(Me.OpenArgs) <> 0 Then

    Me.cmbMemberName.SetFocus
    DoCmd.FindRecord Me.OpenArgs

    MsgBox (Me.OpenArgs)
    Me!cmbMemberName.Dropdown

Else
   ....

DoCmd 发生错误。有什么建议么。谢谢。我可以加载整个序列，但我认为没有必要。

Answer 1

首先你必须设置组合框的值。假设您的 openargs 与应该只是

的组合框的 bound column 相匹配

Me.cmbMemberName = Me.OpenArgs

之后，您需要让子表单根据组合框值进行填充。假设您已将子表单设置为正确读取您只需要重新查询的值

Me.MySubForm.requery

如何以编程方式 select 组合框中的值？

How to programmatically select a value in combo-box?

ms-access

vba

combobox

openargs