当你创建好窗体后,可以通过在窗体里的Combo0的AfterUpdate事件里编写代码来使Textbox显示你想要的值。
代码示例:
Private Sub Combo0_AfterUpdate()
Text2.Value = DLookup("[A2]", "表A", "[A1] = Combo0.value")
End Sub
Jaynet Zhang
TechNet Community Support