我对VBA完全陌生。我试图在窗体中获得一个文本框,以根据下拉菜单的选择显示不同的值。例如,下拉列表具有4个值:A,B,C,D(从表中获取)。对于每个值,都有一个estFees字段(即A estFees,B estFees等)
我在表单中创建了一个textBox,我想要:当在下拉列表中选择A时=> textBox中的文本显示A estFees等
到目前为止,这是我尝试过的操作:在textBox的After Update事件中,我编写了以下语句:
if me.cboJob.value = "A" then me.textBox.text = Tables![tableA]![estFees]
不能让它工作。任何帮助将不胜感激。
我认为您要么需要基于查询的组合,要么要使用DLookup,我建议第一种可能性,例如
SELECT t1.OptionValue, t2.estFees
FROM Table1 t1
INNER JOIN TableA t2
ON t1.Optionvalue = t2.OptionValue
然后,您可以将文本框设置为:
Me.MyCombo.Column(1)
请注意,计数从零开始。
DLookUp会建议
=DLookup("estFees","TableA", "OptionValue='" & MyCombo & "'")
有很多变量,上面是一个草图。
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句