将变量从子项传递到父项，就像函数 VB.NET 一样

Question

我已经创建了2个表单（父级和子级），我想将变量的唯一文本框值存储到父表单中。

也像这样：

父代码：

dim passed_value = new childform()
passed_value.show()

收盘时：

使用子窗体文本框值刷新passed_value变量。

Answer 1

您可以执行以下操作来完成任务：

• 在子窗体中声明一个String变量。

    Public value As String

• 使用主窗体中的ShowDialog()显示子窗体。

    Dim frm As New Form2
    frm.ShowDialog()

• [根据需要在表单中设置value]

    value = "New Value"

• 现在从 Child 窗体中获取 value 变量，并根据它设置文本框文本。

    TextBox1.Text = frm.value

Answer 2

我会把它变成一个属性并给它必要的访问权限，对我来说这看起来很ReadOnly。

Private _myValue As DataType
Public ReadOnly Property MyValue() As DataType
Get
    Return _myValue
End Get

您可以这样访问它：myForm.MyValue .