将文本从一个表单移动到另一个表单

Question

我有一个弹出窗口，其中包含超过100个项目的组合框。我想这样做当用户选择项目并双击它时，它会将项目添加到另一个表单（主表单）上的文本框中。如果制作了多个选项并将其添加到文本框中，我希望每个选项在同一文本框中用逗号分隔。

这可能吗？

主窗体是[f_Requests]，有一个名为txtPractices的文本框 弹出窗体是[f_Practices]

Answer 1

在组合框的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

如果打开主窗体，可以先改进检查。