顯示來自選定列表框的訪問子表單中的查詢

Question

在 Access 2010 中，我試圖讓一個表單在子表單QueriesSubForm中顯示一個查詢，當從列表框QueryListBox選擇時，然后單擊按鈕runbtn 。 它應該在鏈接的子表單中顯示查詢，並在您從列表框中選擇的不同選項中再次執行整個步驟並單擊按鈕時進行更改。

目前我只能讓它工作，如果我想讓它在一個新的任務窗口中顯示查詢，當這樣編程時：

QueriesListBox 列表框 - SQL 視圖

SELECT MSysObjects.[Name]
FROM MSysObjects
WHERE (((MSysObjects.[Type])=5) AND ((Left([Name],1))<>"~"))
ORDER BY MSysObjects.[Name];

runbtn 按鈕 - VBA 視圖

Private Sub runbtn_Click()
DoCmd.OpenQuery QueryListBox, acViewNormal
End Sub

它可以工作並且似乎只是從查詢列表中打開一個查詢並將其顯示給我，這是我不想要的。

這可能是一件簡單的事情，但我看不到它是如何使用 SQL、VBA 或宏完成的，我猜這是需要它來工作的

Answer 1

好的，這是一種方法。 首先確保您的子表單設置為沒有源對象。 然后像這樣設置你的按鈕點擊：

Private Sub runbtn_Click()
    Me.QueriesSubForm.SourceObject = "Query." & QueryListBox.Value
End Sub

這應該會讓你得到你正在尋找的結果。 或者，如果您希望您的表單以特定查詢打開並在打開時顯示，您可以將子表單的源對象設置為該查詢。 使用屬性窗口找到源對象下拉列表，然后找到要在表單打開時顯示的查詢。