我有一个窗口申请表,我有查询(搜索表单),在第一个表格的顶部弹出对话框表格。通过这个对话框表单的搜索值,我希望看到后面的结果。就像当我在对话框表单中输入一些搜索文本并单击查找按钮时,对话框表格将关闭,结果将显示在后面的表格上。结果可以在DropDown组合或网格或任何控件中显示。
但最主要的是从Dialog Form获取价值,以支持Form。
答案 0 :(得分:1)
实现此目的的一种简单方法是让“查找”按钮隐藏表单。然后,您可以将结果公开为表单的公共属性,最后调用例程可以在获得结果时关闭和卸载表单。
在通话形式中......
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
这是一种简单的方法。您也可以将整个内容包装在一个类中。
答案 1 :(得分:0)
你能使用InputBox
吗?
这会弹出一个带文本框的模态对话框,并返回输入的字符串。
答案 2 :(得分:0)
您可以将其作为参数传递给另一种形式的子程序