Ms access 不使用鼠标反复使用MS Access组合框

我使用组合框在未绑定的文本框中追加文本。我单击下拉箭头并开始键入（自动扩展，这是组合框的真正原因/用例）或单击选择。我可能想再做两三次。我不想再点击下拉菜单了。我只想开始打字。这里的最后两行不是为我做的：

Private Sub cmboTag1\u AfterUpdate（）
Me.txtTags.Value=Me.txtTags.Value&&Me.cmboTag1.Value
Me.cmboTag1.SetFocus
Me.cmboTag1.下拉列表
端接头

---

有什么办法吗？

如果你对

发送键没有强烈的反感（有些人是这样），那么这对我来说似乎很有效：

选项比较数据库
选项显式
标注为布尔值的Dim CMBOUN
私人子cmboTag1_更新后（）
cmboUpdated=True
Me.txtTags.Value=Me.txtTags.Value&&Me.cmboTag1.Value
端接头
私人子cmboTag1_GotFocus（）
cmboUpdated=False
SendKeys“%{DOWN}”
端接头
私人子cmboTag1_LostFocus（）
如果你的名字是什么
SendKeys“+{TAB}”
如果结束
端接头
这么长时间以来，我不得不查找键绑定：%is ALT、+is SHIFT、^is CTRL等等。。。我所见过的SendKeys的首次正式使用。请注意，SendKeys在某些windows版本中可能不起作用。