通过windows窗体传递变量

时间:2015-10-16 14:19:31

标签: vb.net

我只想将一些值传递给另一个表单,并将当前表单关闭,

这就是我所拥有的

- Form1中 -

Private Sub cmdCreate_Click(sender As Object, e As EventArgs) Handles cmdCreate.Click
    Form2.cmdCreate.PerformClick()
    Form2.txtbox1.text = "Something"
    Form2.Show()

    Me.Dispose()
End Sub

正在发生的事情是Form2它立即打开并关闭

提前致谢

2 个答案:

答案 0 :(得分:0)

我在form2中创建了这个

Public Sub New(ByVal Val1 As String)
    InitializeComponent()
    ...
End Sub

并添加一个DialogResult设置为OK的按钮

在form1中使用此

Dim Dialog As New form2("SomeString")
Dim Result As DialogResult = Dialog.ShowDialog(Me)

If Result = Windows.Forms.DialogResult.Yes Then
   ...
End If

Form2将在Val1参数= 3

中重现“SomeString”

答案 1 :(得分:-1)

您需要将Form2的父级设置为Form1的父级Form2.Parent = Me.ParentForm