Vba 如何基于IF语句Access 2010在文本框中显示不同的值

我对VBA一无所知。 我试图得到一个文本框的形式，以显示一个不同的值的基础上选择的下拉菜单。 例如 下拉列表有4个值：A、B、C、D从表中获取它们 每种价值观都有一个Estfee字段，即A Estfee、B Estfee等

我在表单中创建了一个文本框，我希望： 当在下拉列表中选择A=>时，文本框中的文本将显示A等

这就是我迄今为止所尝试的： 在文本框的更新后事件中，我写了以下语句：

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("estFees","TableA", "OptionValue='" & MyCombo & "'")

有许多变量，上面的是一个草图