how do I declare a control in windows forms

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()>

Partial Class Form1

Inherits System.Windows.Forms.Form

'Form overrides dispose to clean up the component list.

<System.Diagnostics.DebuggerNonUserCode()>

Protected Overrides Sub Dispose(ByVal disposing As Boolean)

    Try

        If disposing AndAlso components IsNot Nothing Then

            components.Dispose()

        End If

    Finally

        MyBase.Dispose(disposing)

    End Try

End Sub

'Required by the Windows Form Designer

Private components As System.ComponentModel.IContainer

'NOTE: The following procedure is required by the Windows Form Designer

'It can be modified using the Windows Form Designer.  

'Do not modify it using the code editor.

<System.Diagnostics.DebuggerStepThrough()>

Private Sub InitializeComponent()

    CommandAction = New Button()

    Baudratestr = New TextBox()

    Portnamestr = New TextBox()

    ResponseStr = New TextBox()

    BaudRate = New Label()

    PortNamelbl = New Label()

    commandlbl = New Label()

    SuspendLayout()

    ' 

    ' Button1

    ' 

    CommandAction.Location = New Point(122, 120)

    CommandAction.Name = "Button1"

    CommandAction.Size = New Size(75, 23)

    CommandAction.TabIndex = 0

    CommandAction.Text = "Action"

    CommandActionUse.VisualStyleBackColor = True

    ' 

    '  Baudratestr 

    ' 

    Baudratestr.Location = New Point(60, 23)

    Baudratestr.Name = " Baudratestr "

    Baudratestr.Size = New Size(236, 23)

    Baudratestr.TabIndex = 1

    ' 

    ' PortnameStr

    ' 

    Portnamestr.Location = New Point(60, 52)

    Portnamestr.Name = "PortnameStr"

    Portnamestr.Size = New Size(236, 23)

    Portnamestr.TabIndex = 2

    ' 

    ' mmandstr 

    ' 

    mmandstr.Location = New Point(60, 81)

    mmandstr.Name = "mmandstr "

    mmandstr.Size = New Size(236, 23)

    mmandstr.TabIndex = 3

    ' 

    ' BaudRate

    ' 

    BaudRate.AutoSize = True

    BaudRate.Location = New Point(12, 26)

    BaudRate.Name = "BaudRate"

    BaudRate.Size = New Size(13, 15)

    BaudRate.TabIndex = 4

    BaudRate.Text = "a"

    ' 

    ' PortNamelbl

    ' 

    PortNamelbl.AutoSize = True

    PortNamelbl.Location = New Point(13, 52)

    PortNamelbl.Name = "PortNamelbl"

    PortNamelbl.Size = New Size(41, 15)

    PortNamelbl.TabIndex = 5

    PortNamelbl.Text = "PortNamelbl"

    ' 

    ' commandlbl

    ' 

    commandlbl.AutoSize = True

    commandlbl.Location = New Point(12, 81)

    commandlbl.Name = "commandlbl"

    commandlbl.Size = New Size(41, 15)

    commandlbl.TabIndex = 6

    commandlbl.Text = "commandlbl"

    ' 

    ' Form1

    ' 

    AutoScaleDimensions = New SizeF(7.0F, 15.0F)

    AutoScaleMode = AutoScaleMode.Font

    ClientSize = New Size(800, 450)

    Controls.Add(commandlbl)

    Controls.Add(PortNamelbl)

    Controls.Add(BaudRate)

    Controls.Add(mmandstr)

    Controls.Add(Portnamestr)

    Controls.Add(Baudratestr)

    Controls.Add(CommandAction)

    Name = "Form1"

    Text = "Form1"

    ResumeLayout(False)

    PerformLayout()

End Sub

Friend WithEvents Button1 As Button

Friend WithEvents Baudratestr As TextBox

Friend WithEvents Portnamestr As TextBox

Friend WithEvents Commandstr As TextBox

Friend WithEvents BaudRatelbl As Label

Friend WithEvents PortNamelbl As Label

Friend WithEvents commandlbl As Label