如何在VB.Net中获取对话框窗体到窗体的值

我有windows应用程序窗体，在该窗体上有查找（搜索窗体），在第一个窗体上弹出对话框窗体。通过此对话框表单的搜索值，我希望看到表单后面的结果。就像我在对话框窗体中输入一些搜索文本，然后单击“查找”按钮，对话框窗体将关闭，结果将显示在后面的窗体上。结果可以显示在下拉组合、网格或任何控件中

---

但最主要的是从对话框窗体到后面的窗体获取值。

您可以使用

InputBox

？

---

这会弹出一个带有文本框的模态对话框，并返回输入的字符串。

您可以将其作为参数以另一种形式传递给子例程。

一种简单的方法是让“查找”按钮简单地隐藏该表单。然后可以将结果作为表单的公共属性公开，最后调用例程可以在得到结果后关闭并卸载表单

在呼叫表单中

在您的对话框窗体中

---

这是一个简单的方法。您也可以将整个过程封装在一个类中。

我使用的是另一个表单，而不是InputBox……在对话框表单上，我有一个网格控件，其中包含公司列表……当我双击列表中任何公司的名称时，该表单必须关闭，公司值必须显示在后面表单的Combo中。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

    Dim SelectorDialog As New myDialog
    SelectorDialog.ShowDialog()
    Dim result As String = SelectorDialog.Result()
    SelectorDialog = Nothing
    'do something with the result

End Sub

Private formResult As String

Public Function Result() As String
    Return formResult
End Function

Private Sub cmdFind_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdFind.Click
    formResult = "some result"
    Me.Hide()
End Sub