form1.designer.vb

清华大学出版社出版的 移动应用开发宝典 张大威（2008）的附书源代码

<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Public 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)
        If disposing AndAlso components IsNot Nothing Then
            components.Dispose()
        End If
        MyBase.Dispose(disposing)
    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()
        Me.components = New System.ComponentModel.Container
        Me.spPort = New System.IO.Ports.SerialPort(Me.components)
        Me.btnSend = New System.Windows.Forms.Button
        Me.txtOutgoing = New System.Windows.Forms.TextBox
        Me.txtBaud = New System.Windows.Forms.TextBox
        Me.txtData = New System.Windows.Forms.TextBox
        Me.lblBaud = New System.Windows.Forms.Label
        Me.menuItem2 = New System.Windows.Forms.MenuItem
        Me.mnuExit = New System.Windows.Forms.MenuItem
        Me.mnuConnect = New System.Windows.Forms.MenuItem
        Me.mainMenu1 = New System.Windows.Forms.MainMenu
        Me.lblPort = New System.Windows.Forms.Label
        Me.cbPort = New System.Windows.Forms.ComboBox
        Me.SuspendLayout()
        '
        'btnSend
        '
        Me.btnSend.Enabled = False
        Me.btnSend.Location = New System.Drawing.Point(189, 242)
        Me.btnSend.Name = "btnSend"
        Me.btnSend.Size = New System.Drawing.Size(50, 20)
        Me.btnSend.TabIndex = 13
        Me.btnSend.Text = "Send"
        '
        'txtOutgoing
        '
        Me.txtOutgoing.Location = New System.Drawing.Point(2, 242)
        Me.txtOutgoing.Name = "txtOutgoing"
        Me.txtOutgoing.Size = New System.Drawing.Size(181, 21)
        Me.txtOutgoing.TabIndex = 12
        '
        'txtBaud
        '
        Me.txtBaud.Location = New System.Drawing.Point(66, 33)
        Me.txtBaud.Name = "txtBaud"
        Me.txtBaud.Size = New System.Drawing.Size(170, 21)
        Me.txtBaud.TabIndex = 11
        Me.txtBaud.Text = "9600"
        '
        'txtData
        '
        Me.txtData.Font = New System.Drawing.Font("Courier New", 8.0!, System.Drawing.FontStyle.Regular)
        Me.txtData.Location = New System.Drawing.Point(2, 60)
        Me.txtData.Multiline = True
        Me.txtData.Name = "txtData"
        Me.txtData.ScrollBars = System.Windows.Forms.ScrollBars.Both
        Me.txtData.Size = New System.Drawing.Size(237, 176)
        Me.txtData.TabIndex = 10
        '
        'lblBaud
        '
        Me.lblBaud.Location = New System.Drawing.Point(11, 33)
        Me.lblBaud.Name = "lblBaud"
        Me.lblBaud.Size = New System.Drawing.Size(49, 20)
        Me.lblBaud.Text = "Baud:"
        '
        'menuItem2
        '
        Me.menuItem2.MenuItems.Add(Me.mnuExit)
        Me.menuItem2.Text = "Menu"
        '
        'mnuExit
        '
        Me.mnuExit.Text = "Exit"
        '
        'mnuConnect
        '
        Me.mnuConnect.Text = "Connect"
        '
        'mainMenu1
        '
        Me.mainMenu1.MenuItems.Add(Me.mnuConnect)
        Me.mainMenu1.MenuItems.Add(Me.menuItem2)
        '
        'lblPort
        '
        Me.lblPort.Location = New System.Drawing.Point(11, 5)
        Me.lblPort.Name = "lblPort"
        Me.lblPort.Size = New System.Drawing.Size(49, 20)
        Me.lblPort.Text = "Port:"
        '
        'cbPort
        '
        Me.cbPort.Location = New System.Drawing.Point(66, 5)
        Me.cbPort.Name = "cbPort"
        Me.cbPort.Size = New System.Drawing.Size(170, 22)
        Me.cbPort.TabIndex = 9
        '
        'Form1
        '
        Me.AutoScaleDimensions = New System.Drawing.SizeF(96.0!, 96.0!)
        Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Dpi
        Me.AutoScroll = True
        Me.ClientSize = New System.Drawing.Size(240, 268)
        Me.Controls.Add(Me.btnSend)
        Me.Controls.Add(Me.txtOutgoing)
        Me.Controls.Add(Me.txtBaud)
        Me.Controls.Add(Me.txtData)
        Me.Controls.Add(Me.lblBaud)
        Me.Controls.Add(Me.lblPort)
        Me.Controls.Add(Me.cbPort)
        Me.Menu = Me.mainMenu1
        Me.MinimizeBox = False
        Me.Name = "Form1"
        Me.Text = "Terminal"
        Me.ResumeLayout(False)

    End Sub
    Private WithEvents spPort As System.IO.Ports.SerialPort
    Private WithEvents btnSend As System.Windows.Forms.Button
    Private WithEvents txtOutgoing As System.Windows.Forms.TextBox
    Private WithEvents txtBaud As System.Windows.Forms.TextBox
    Private WithEvents txtData As System.Windows.Forms.TextBox
    Private WithEvents lblBaud As System.Windows.Forms.Label
    Private WithEvents menuItem2 As System.Windows.Forms.MenuItem
    Private WithEvents mnuExit As System.Windows.Forms.MenuItem
    Private WithEvents mnuConnect As System.Windows.Forms.MenuItem
    Private WithEvents mainMenu1 As System.Windows.Forms.MainMenu
    Private WithEvents lblPort As System.Windows.Forms.Label
    Private WithEvents cbPort As System.Windows.Forms.ComboBox

End Class