通过第一种形式在第二种形式上同时创建标签

Question

嗨，美好的一天，我只想问一个问题，因为我想创建一个标签，第二个标签上有我放入第一个表单的textbox1的文本，我想同时做到这一点，例如，我在form2中添加了文本标签后，我会再次使用相同的方法添加另一个标签和文本。我试图找出它3个小时，但仍然没有运气。这里是代码..感谢提前球员

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 

    Dim frm2 As New Form2  'Create your Form 
    Dim lbl As Label = New Label  'Create your Label 
    lbl.Location = New Point(50, 50) 'Set Label Location 
    lbl.Text = TextBox1.Text   'Set Label Text 
    lbl.ForeColor = Color.Black  'Set Label ForeColor 
    frm2.Controls.Add(lbl)   'Add Label to it 
    frm2.Show(Me)     'Show Second Form 

End Sub 

我不具有form2.show命令的意图，因为我有用于示出第二form..but另一个按钮时，我将其删除它产生错误。

Answer 1

使用此代码的类..

Private frm2 As New Form2 

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click 

    Dim lbl As Label = New Label  'Create your Label 
    'change the location..  
    lbl.Location = New Point(50, 50) 'Set Label Location 
    lbl.Text = TextBox1.Text   'Set Label Text 
    lbl.ForeColor = Color.Black  'Set Label ForeColor 
    frm2.Controls.Add(lbl)   'Add Label to it 

End Sub 

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click 
    if frm2 IsNot Nothing Then 
     frm2.Show(Me)   'Show Second Form 
    End If  
End Sub