在Access上选择组合框选项时,请填写文本框

时间:2015-12-22 12:52:02

标签: vba combobox

我在Access中不是很先进,我正在努力为可以产生以下结构的指令定义VBA代码/表达式构建/或控制源:

  • 如果我在组合框上做出选择(我的关键字段" TypeService"在我的桌子TblMain上)
  • ,然后;我的文本框能够返回与之前选择的TypeService相关的TypeConfig行(我的表TblConfig包含TypeServiceFK和TypeConfig字段)

所以,我的目标是获得一个依赖于多选项组合框的动态文本框.-

感谢您的帮助!!

1 个答案:

答案 0 :(得分:0)

在表单上放一个列表框,假设它叫做List2,如果它弹出就取消向导。

在列表框的Row Source属性中,输入此SQL语句

SELECT tblConfig.TypeConfig FROM tblConfig WHERE (((tblConfig.TypeService)=[Forms]![frmMain]![Combo0])); 

这假设您的表单被称为frmMain,并且您的组合框被称为Combo0,因此请根据需要进行更改。

右键单击Combo0并选择Build Event,然后选择Code Builder。用

替换Sub...End Sub存根
Private Sub Combo0_Change()

    Me.List2.Requery

End Sub

现在,每次Combo0更改时,List2后面的SQL语句都将运行并返回与该TypeService关联的TypeConfigs。