2013-07-26 41 views
0

我有一個列表框,其行源是「tblitems」,帶有下圖字段。 現在我喜歡右鍵單擊此列表框並選擇一個選項,例如「新任務」,它會打開新的任務表單並自動從列表框中抓取項目編號並在「新任務」中填寫相關文本框「項目編號」表格「tbltask」我們如何從列表框中獲取值並以新的形式填充自動相關的文本框

現在,當我按下「應用」按鈕時,它會在「tbltask」中插入新記錄。 enter image description here

tblItems 
    item number (pk) 
item name (text) 

tbltask 
    task number (auto number,pk) 
    item number 
    enter image description here 

enter image description here

回答

0

的形式從列表框中獲取的值是:

Me.List_Box_Name.Value 

或者,如果您有未綁定的值,然後把它基於列:

Me.List_Box_Name.Column(2) 

或您需要的列。

然後,您可以使用DLookup或記錄集填充字段。然後,如果你想要這個,當你打開一個新的形式出現,你可能想看看這個:

Private Sub Form_Load() 
    'Stuff you want to happen when that form loads 
End Sub 

更新

下面將你點擊它每次打印出值。您可以使用此方法觸發要打開的新表單,也可以讓用戶之後單擊提交按鈕。

Private Sub Test_List_Click() 
    Debug.Print Me.Test_List.Value 
    DoCmd.OpenForm "Form_Name" 
End Sub 

現在我不完全確定將變量添加到打開窗體的最佳方式。如果這是我的有限知識,我會添加一個全局或公共字符串,並檢查Form_Load()以查看該字符串長度是否大於0.如果是,則會填充該字段。

希望幫助

更新2

其實這個鏈接可以幫助你從以前的填充表單字段:

MS Access - open a form taking a field value from a previous form

+0

謝謝,我想用Me.List_Box_Name.Value對於表單加載時(txtItem = Me.List_Box_Name.Value)的新形式的未綁定文本框「txtItem」,但我不知道如何通過代碼編寫該文本框。 – masoud

+0

所以,你想在表單加載時填充列表框?或者你想在用戶從列表框中選擇一個項目後從列表框中獲取值? – Grant

+0

我想在用戶從列表框中選擇一個項目後,從列表框中獲取值,然後在新窗體中使用此值將會加載。 – masoud

相關問題