Question

我目前在MS ACCESS工作。我有两个名为 MyForm 的表单，第二个名称为 Transit 。我有一个名为 SimulationTable 的表，它有4个字段Fiscal_Year，Scenario_Number，Description和Operating_Unit。我想用VBA代码点击一个按钮，在名为 TXTBOX 的文本框中显示SQL查询的结果，该文本框采用Transit格式。我尝试了很多次，但它没有用。知道怎么解决？谢谢。

这是SQL查询：

SELECT SimulationTable.Description FROM SimulationTable WHERE Fiscal_Year=Forms!MainForm!OperatingFY AND Operating_Unit = Forms!MainForm!Text3 AND Scenario_Number = Forms!MainForm!Selected_scenario

Answer 1

可以使用DLookup（）：

Me.TXTBOX = DLookup("[Description]", "SimulationTable", "Fiscal_Year=" & Forms!MainForm!OperatingFY & _ 
    " AND Operating_Unit = " & Forms!MainForm!Text3 & _ 
    " AND Scenario_Number = " & Forms!MainForm!Selected_scenario)

这些标准字段是否都是数字类型？ TXTBOX绑定到一个字段？如果没有，甚至可以将DLookup（）表达式放在ControlSource属性中。

Answer 2

有效。我在＆＃34; Operating_Unit＆＃34;周围添加了撇号。这是一个文本格式的字段。非常感谢June7。

Me.TXTBOX = DLookup("[Description]", "SimulationTable", "Fiscal_Year=" & Forms!MainForm!OperatingFY & " AND Operating_Unit ='" & Forms!MainForm!Text3 & "' AND Scenario_Number =" & Forms!MainForm!Selected_scenario)

通过VBA代码使用sql查询将值传递给文本框 - MS ACCESS

2 个答案: