Trimmed a bit (hopefully I didn't snip any of the important stuff) but....
Public Class Form1
Inherits System.Windows.Forms.Form
Public Sub New()
MyBase.New()
InitializeComponent()
End Sub
Private components As System.ComponentModel.IContainer
Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.TextBox1 = New System.Windows.Forms.TextBox()
Me.TextBox1.Location = New System.Drawing.Point(80, 16)
Me.TextBox1.Name = "TextBox1"
Me.TextBox1.Text = "TextBox1"
Me.ClientSize = New System.Drawing.Size(624, 502)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.TextBox1})
Me.Name = "Form1"
Me.Text = "Form1"
End Sub
End Class
Public Class Form2
Inherits Form1
Public Sub New()
MyBase.New()
InitializeComponent()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
MsgBox(Me.TextBox1.Text)
End Sub
End Class