Dim a As TextBox = TextBox1 Dim b As TextBox = TextBox2 b.Text = a.Text
Dim a As String = TextBox1.Text TextBox2.Text = a