通過VBA代碼通過SQL查詢將值傳遞到文本框-MS ACCESS

Question

我目前正在使用MS ACCESS。 我有2個表單，一個叫做MyForm ，第二個叫Transit 。 我有一個名為SimulationTable的表，該表具有4個字段Fiscal_Year，Scenario_Number，Description和Operating_Unit。 我想在單擊按鈕以在Transt形式的名為TXTBOX的文本框中顯示SQL查詢結果時使用VBA代碼。 我已經嘗試了很多次，但是沒有用。 關於如何解決的任何想法？ 謝謝。

這是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

有用。 我在“ Operating_Unit”（這是文本格式的字段）周圍添加了撇號。 非常感謝June7。

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