2015-10-22 165 views
0

我有一個彈出窗口,其中包含超過100個項目的組合框。我想這樣做,當用戶選擇該項目並雙擊時,它會將該項目添加到另一個窗體(主窗體)上的文本框中。如果有多個選擇被添加到文本框中,我希望每個選項在同一個文本框中用逗號分隔。將文本從一個表單移動到另一個表單

這可能嗎?

主要形式是[f_Requests]和有一個稱爲txtPractices文本框 彈出形式是[f_Practices)

回答

0

在組合框的DoubleClick事件,代碼是這樣的:

Dim txtP As String 
txtP = Nz(Forms!f_Requests.txtPractices,"") 

If Len(txtP) > 0 Then 
    Forms!f_Requests.txtPractices = txtP & " , " & nameofthecombobox 
Else 
    Forms!f_Requests.txtPractices = nameofthecombobox 
End If 

這可以提高首先檢查主窗體是否打開。

+0

這段代碼正是我正在尋找的,但是這也在第一段文字(,封面,搖滾等)前面添加了昏迷。如果第一個值被忽略,是否有編輯忽略該常見問題? – Charlie

+0

查看版本 – FMD

+0

當txtPractices爲空時,我得到「無效的空值使用」,調試突出顯示了代碼的txtP = Forms!f_Requests.txtPractices部分。當txtPractices有一個值時,則添加其他值。 – Charlie

相關問題