0
我有一個彈出窗口,其中包含超過100個項目的組合框。我想這樣做,當用戶選擇該項目並雙擊時,它會將該項目添加到另一個窗體(主窗體)上的文本框中。如果有多個選擇被添加到文本框中,我希望每個選項在同一個文本框中用逗號分隔。將文本從一個表單移動到另一個表單
這可能嗎?
主要形式是[f_Requests]和有一個稱爲txtPractices文本框 彈出形式是[f_Practices)
我有一個彈出窗口,其中包含超過100個項目的組合框。我想這樣做,當用戶選擇該項目並雙擊時,它會將該項目添加到另一個窗體(主窗體)上的文本框中。如果有多個選擇被添加到文本框中,我希望每個選項在同一個文本框中用逗號分隔。將文本從一個表單移動到另一個表單
這可能嗎?
主要形式是[f_Requests]和有一個稱爲txtPractices文本框 彈出形式是[f_Practices)
在組合框的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
這可以提高首先檢查主窗體是否打開。
這段代碼正是我正在尋找的,但是這也在第一段文字(,封面,搖滾等)前面添加了昏迷。如果第一個值被忽略,是否有編輯忽略該常見問題? – Charlie
查看版本 – FMD
當txtPractices爲空時,我得到「無效的空值使用」,調試突出顯示了代碼的txtP = Forms!f_Requests.txtPractices部分。當txtPractices有一個值時,則添加其他值。 – Charlie