從列表框中獲取一個值並將其傳遞到表單上的一個對象上

Question

我想在列表框中找到一個數字值，並將其放到表單本身的文本框中。我想這樣做，然後使用該值作爲唯一的ID號碼鏈接到窗體上找到的子窗體之一。可能嗎？

Answer 1

我在我的一個窗體上有類似的東西，我建議將它設置爲一個全局變量，然後使用該變量作爲控件來源。

在VBA中創建一個模塊並稱之爲某事。

Public Function Something() As Variant 

'Finds the Current Selected value from Form Element 
Something = Forms("MainMenu").texbox.Column(1) ' 0 is the First Column 

End Function 

這是什麼將存儲您的變量。然後你需要從你的表單中調用它。如果你想將它傳遞給另一種形式，我假設你有一個按鈕或者其他的窗體打開。之前你的任何其他代碼相同的觸發跑到你需要把：

Call Something 

當你調用它，它會設置什麼都值是在你的文本框變量。

一旦存儲在這個變量，你會簡單地把在文本框控件來源的其他形式：

=Something() 

然後當過你的其他形式被激活時，會顯示什麼都ID存儲在變量。 請記住，如果你指示你的用戶遠離你的表單重新設置變量爲空。