_ Partial Class Telephone Inherits System.Windows.Forms.Form 'Form 重写 Dispose,以清理组件列表。 _ 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 'Windows 窗体设计器所必需的 Private components As System.ComponentModel.IContainer '注意: 以下过程是 Windows 窗体设计器所必需的 '可以使用 Windows 窗体设计器修改它。 '不要使用代码编辑器修改它。 _ Private Sub InitializeComponent() Me.components = New System.ComponentModel.Container() Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(Telephone)) Me.SplitContainer1 = New System.Windows.Forms.SplitContainer() Me.SplitContainer2 = New System.Windows.Forms.SplitContainer() Me.Button4 = New System.Windows.Forms.Button() Me.TextBox3 = New System.Windows.Forms.TextBox() Me.Label4 = New System.Windows.Forms.Label() Me.Button3 = New System.Windows.Forms.Button() Me.TextBox1 = New System.Windows.Forms.TextBox() Me.Label3 = New System.Windows.Forms.Label() Me.Panel1 = New System.Windows.Forms.Panel() Me.CheckBox1 = New System.Windows.Forms.CheckBox() Me.ComboBox2 = New System.Windows.Forms.ComboBox() Me.Button2 = New System.Windows.Forms.Button() Me.TextBox2 = New System.Windows.Forms.TextBox() Me.Button1 = New System.Windows.Forms.Button() Me.Label2 = New System.Windows.Forms.Label() Me.ComboBox1 = New System.Windows.Forms.ComboBox() Me.Label1 = New System.Windows.Forms.Label() Me.ToolStrip1 = New System.Windows.Forms.ToolStrip() Me.RichTextBox1 = New System.Windows.Forms.RichTextBox() Me.ToolStrip2 = New System.Windows.Forms.ToolStrip() Me.ToolStripLabel1 = New System.Windows.Forms.ToolStripLabel() Me.ToolStripTextBox2 = New System.Windows.Forms.ToolStripTextBox() Me.ToolStripLabel2 = New System.Windows.Forms.ToolStripLabel() Me.ToolStripTextBox1 = New System.Windows.Forms.ToolStripTextBox() Me.ToolStripButton4 = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton3 = New System.Windows.Forms.ToolStripButton() Me.ToolStripButton5 = New System.Windows.Forms.ToolStripButton() Me.SerialPort1 = New System.IO.Ports.SerialPort(Me.components) CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainer1.Panel1.SuspendLayout() Me.SplitContainer1.Panel2.SuspendLayout() Me.SplitContainer1.SuspendLayout() CType(Me.SplitContainer2, System.ComponentModel.ISupportInitialize).BeginInit() Me.SplitContainer2.Panel1.SuspendLayout() Me.SplitContainer2.SuspendLayout() Me.Panel1.SuspendLayout() Me.ToolStrip2.SuspendLayout() Me.SuspendLayout() ' 'SplitContainer1 ' Me.SplitContainer1.Dock = System.Windows.Forms.DockStyle.Fill Me.SplitContainer1.Location = New System.Drawing.Point(0, 0) Me.SplitContainer1.Name = "SplitContainer1" ' 'SplitContainer1.Panel1 ' Me.SplitContainer1.Panel1.Controls.Add(Me.SplitContainer2) Me.SplitContainer1.Panel1.Controls.Add(Me.Panel1) Me.SplitContainer1.Panel1.Controls.Add(Me.ToolStrip1) ' 'SplitContainer1.Panel2 ' Me.SplitContainer1.Panel2.Controls.Add(Me.RichTextBox1) Me.SplitContainer1.Panel2.Controls.Add(Me.ToolStrip2) Me.SplitContainer1.Size = New System.Drawing.Size(1162, 744) Me.SplitContainer1.SplitterDistance = 586 Me.SplitContainer1.TabIndex = 0 ' 'SplitContainer2 ' Me.SplitContainer2.Dock = System.Windows.Forms.DockStyle.Fill Me.SplitContainer2.Location = New System.Drawing.Point(0, 192) Me.SplitContainer2.Name = "SplitContainer2" Me.SplitContainer2.Orientation = System.Windows.Forms.Orientation.Horizontal ' 'SplitContainer2.Panel1 ' Me.SplitContainer2.Panel1.Controls.Add(Me.Button4) Me.SplitContainer2.Panel1.Controls.Add(Me.TextBox3) Me.SplitContainer2.Panel1.Controls.Add(Me.Label4) Me.SplitContainer2.Panel1.Controls.Add(Me.Button3) Me.SplitContainer2.Panel1.Controls.Add(Me.TextBox1) Me.SplitContainer2.Panel1.Controls.Add(Me.Label3) Me.SplitContainer2.Size = New System.Drawing.Size(586, 552) Me.SplitContainer2.SplitterDistance = 85 Me.SplitContainer2.TabIndex = 2 ' 'Button4 ' Me.Button4.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button4.Location = New System.Drawing.Point(476, 40) Me.Button4.Name = "Button4" Me.Button4.Size = New System.Drawing.Size(107, 31) Me.Button4.TabIndex = 10 Me.Button4.Text = "发送" Me.Button4.UseVisualStyleBackColor = True ' 'TextBox3 ' Me.TextBox3.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.TextBox3.Location = New System.Drawing.Point(114, 40) Me.TextBox3.Name = "TextBox3" Me.TextBox3.Size = New System.Drawing.Size(356, 31) Me.TextBox3.TabIndex = 9 ' 'Label4 ' Me.Label4.AutoSize = True Me.Label4.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Label4.Location = New System.Drawing.Point(5, 50) Me.Label4.Name = "Label4" Me.Label4.Size = New System.Drawing.Size(105, 21) Me.Label4.TabIndex = 8 Me.Label4.Text = "短信内容:" ' 'Button3 ' Me.Button3.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button3.Location = New System.Drawing.Point(476, 6) Me.Button3.Name = "Button3" Me.Button3.Size = New System.Drawing.Size(107, 31) Me.Button3.TabIndex = 7 Me.Button3.Text = "拨打" Me.Button3.UseVisualStyleBackColor = True ' 'TextBox1 ' Me.TextBox1.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.TextBox1.Location = New System.Drawing.Point(114, 6) Me.TextBox1.Name = "TextBox1" Me.TextBox1.Size = New System.Drawing.Size(356, 31) Me.TextBox1.TabIndex = 1 ' 'Label3 ' Me.Label3.AutoSize = True Me.Label3.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Label3.Location = New System.Drawing.Point(5, 11) Me.Label3.Name = "Label3" Me.Label3.Size = New System.Drawing.Size(94, 21) Me.Label3.TabIndex = 0 Me.Label3.Text = "电话号:" ' 'Panel1 ' Me.Panel1.Controls.Add(Me.CheckBox1) Me.Panel1.Controls.Add(Me.ComboBox2) Me.Panel1.Controls.Add(Me.Button2) Me.Panel1.Controls.Add(Me.TextBox2) Me.Panel1.Controls.Add(Me.Button1) Me.Panel1.Controls.Add(Me.Label2) Me.Panel1.Controls.Add(Me.ComboBox1) Me.Panel1.Controls.Add(Me.Label1) Me.Panel1.Dock = System.Windows.Forms.DockStyle.Top Me.Panel1.Location = New System.Drawing.Point(0, 25) Me.Panel1.Name = "Panel1" Me.Panel1.Size = New System.Drawing.Size(586, 167) Me.Panel1.TabIndex = 1 ' 'CheckBox1 ' Me.CheckBox1.AutoSize = True Me.CheckBox1.Font = New System.Drawing.Font("宋体", 15.0!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.CheckBox1.Location = New System.Drawing.Point(476, 98) Me.CheckBox1.Name = "CheckBox1" Me.CheckBox1.Size = New System.Drawing.Size(98, 24) Me.CheckBox1.TabIndex = 8 Me.CheckBox1.Text = "HEX发送" Me.CheckBox1.UseVisualStyleBackColor = True ' 'ComboBox2 ' Me.ComboBox2.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.ComboBox2.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.ComboBox2.FormattingEnabled = True Me.ComboBox2.Items.AddRange(New Object() {"1200", "2400", "4800", "9600", "19200", "38400", "57600", "115200", "256000", "512000", "9216000", "1000000"}) Me.ComboBox2.Location = New System.Drawing.Point(333, 12) Me.ComboBox2.Name = "ComboBox2" Me.ComboBox2.Size = New System.Drawing.Size(137, 29) Me.ComboBox2.TabIndex = 7 ' 'Button2 ' Me.Button2.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button2.Location = New System.Drawing.Point(476, 129) Me.Button2.Name = "Button2" Me.Button2.Size = New System.Drawing.Size(107, 31) Me.Button2.TabIndex = 6 Me.Button2.Text = "发送" Me.Button2.UseVisualStyleBackColor = True ' 'TextBox2 ' Me.TextBox2.Font = New System.Drawing.Font("宋体", 14.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.TextBox2.Location = New System.Drawing.Point(7, 60) Me.TextBox2.Multiline = True Me.TextBox2.Name = "TextBox2" Me.TextBox2.Size = New System.Drawing.Size(463, 100) Me.TextBox2.TabIndex = 5 ' 'Button1 ' Me.Button1.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Button1.Location = New System.Drawing.Point(476, 11) Me.Button1.Name = "Button1" Me.Button1.Size = New System.Drawing.Size(107, 31) Me.Button1.TabIndex = 4 Me.Button1.Text = "打开串口" Me.Button1.UseVisualStyleBackColor = True ' 'Label2 ' Me.Label2.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Label2.Location = New System.Drawing.Point(238, 8) Me.Label2.Name = "Label2" Me.Label2.Size = New System.Drawing.Size(93, 35) Me.Label2.TabIndex = 2 Me.Label2.Text = "波特率:" Me.Label2.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'ComboBox1 ' Me.ComboBox1.DropDownStyle = System.Windows.Forms.ComboBoxStyle.DropDownList Me.ComboBox1.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.ComboBox1.FormattingEnabled = True Me.ComboBox1.Location = New System.Drawing.Point(73, 12) Me.ComboBox1.Name = "ComboBox1" Me.ComboBox1.Size = New System.Drawing.Size(163, 29) Me.ComboBox1.TabIndex = 1 ' 'Label1 ' Me.Label1.Font = New System.Drawing.Font("宋体", 15.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(134, Byte)) Me.Label1.Location = New System.Drawing.Point(3, 8) Me.Label1.Name = "Label1" Me.Label1.Size = New System.Drawing.Size(68, 35) Me.Label1.TabIndex = 0 Me.Label1.Text = "串口:" Me.Label1.TextAlign = System.Drawing.ContentAlignment.MiddleCenter ' 'ToolStrip1 ' Me.ToolStrip1.Location = New System.Drawing.Point(0, 0) Me.ToolStrip1.Name = "ToolStrip1" Me.ToolStrip1.Size = New System.Drawing.Size(586, 25) Me.ToolStrip1.TabIndex = 0 Me.ToolStrip1.Text = "ToolStrip1" ' 'RichTextBox1 ' Me.RichTextBox1.Dock = System.Windows.Forms.DockStyle.Fill Me.RichTextBox1.Location = New System.Drawing.Point(0, 25) Me.RichTextBox1.Name = "RichTextBox1" Me.RichTextBox1.Size = New System.Drawing.Size(572, 719) Me.RichTextBox1.TabIndex = 2 Me.RichTextBox1.Text = "" ' 'ToolStrip2 ' Me.ToolStrip2.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ToolStripLabel1, Me.ToolStripTextBox2, Me.ToolStripLabel2, Me.ToolStripTextBox1, Me.ToolStripButton4, Me.ToolStripButton3, Me.ToolStripButton5}) Me.ToolStrip2.Location = New System.Drawing.Point(0, 0) Me.ToolStrip2.Name = "ToolStrip2" Me.ToolStrip2.Size = New System.Drawing.Size(572, 25) Me.ToolStrip2.TabIndex = 1 Me.ToolStrip2.Text = "ToolStrip2" ' 'ToolStripLabel1 ' Me.ToolStripLabel1.Name = "ToolStripLabel1" Me.ToolStripLabel1.Size = New System.Drawing.Size(56, 22) Me.ToolStripLabel1.Text = "订阅字段" ' 'ToolStripTextBox2 ' Me.ToolStripTextBox2.Font = New System.Drawing.Font("Microsoft YaHei UI", 9.0!) Me.ToolStripTextBox2.Name = "ToolStripTextBox2" Me.ToolStripTextBox2.Size = New System.Drawing.Size(100, 25) ' 'ToolStripLabel2 ' Me.ToolStripLabel2.Name = "ToolStripLabel2" Me.ToolStripLabel2.Size = New System.Drawing.Size(56, 22) Me.ToolStripLabel2.Text = "发布字段" ' 'ToolStripTextBox1 ' Me.ToolStripTextBox1.Font = New System.Drawing.Font("Microsoft YaHei UI", 9.0!) Me.ToolStripTextBox1.Name = "ToolStripTextBox1" Me.ToolStripTextBox1.Size = New System.Drawing.Size(100, 25) ' 'ToolStripButton4 ' Me.ToolStripButton4.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text Me.ToolStripButton4.Image = CType(resources.GetObject("ToolStripButton4.Image"), System.Drawing.Image) Me.ToolStripButton4.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton4.Name = "ToolStripButton4" Me.ToolStripButton4.Size = New System.Drawing.Size(60, 22) Me.ToolStripButton4.Text = "保存设置" ' 'ToolStripButton3 ' Me.ToolStripButton3.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text Me.ToolStripButton3.Image = CType(resources.GetObject("ToolStripButton3.Image"), System.Drawing.Image) Me.ToolStripButton3.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton3.Name = "ToolStripButton3" Me.ToolStripButton3.Size = New System.Drawing.Size(36, 22) Me.ToolStripButton3.Text = "清空" ' 'ToolStripButton5 ' Me.ToolStripButton5.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Text Me.ToolStripButton5.Image = CType(resources.GetObject("ToolStripButton5.Image"), System.Drawing.Image) Me.ToolStripButton5.ImageTransparentColor = System.Drawing.Color.Magenta Me.ToolStripButton5.Name = "ToolStripButton5" Me.ToolStripButton5.Size = New System.Drawing.Size(36, 22) Me.ToolStripButton5.Text = "Test" ' 'SerialPort1 ' ' 'Telephone ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 12.0!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font Me.ClientSize = New System.Drawing.Size(1162, 744) Me.Controls.Add(Me.SplitContainer1) Me.Name = "Telephone" Me.Text = "Form1" Me.SplitContainer1.Panel1.ResumeLayout(False) Me.SplitContainer1.Panel1.PerformLayout() Me.SplitContainer1.Panel2.ResumeLayout(False) Me.SplitContainer1.Panel2.PerformLayout() CType(Me.SplitContainer1, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainer1.ResumeLayout(False) Me.SplitContainer2.Panel1.ResumeLayout(False) Me.SplitContainer2.Panel1.PerformLayout() CType(Me.SplitContainer2, System.ComponentModel.ISupportInitialize).EndInit() Me.SplitContainer2.ResumeLayout(False) Me.Panel1.ResumeLayout(False) Me.Panel1.PerformLayout() Me.ToolStrip2.ResumeLayout(False) Me.ToolStrip2.PerformLayout() Me.ResumeLayout(False) End Sub Friend WithEvents SplitContainer1 As SplitContainer Friend WithEvents ToolStrip1 As ToolStrip Friend WithEvents RichTextBox1 As RichTextBox Friend WithEvents ToolStrip2 As ToolStrip Friend WithEvents ComboBox2 As ComboBox Friend WithEvents Button2 As Button Friend WithEvents TextBox2 As TextBox Friend WithEvents Button1 As Button Friend WithEvents Label2 As Label Friend WithEvents ComboBox1 As ComboBox Friend WithEvents Label1 As Label Friend WithEvents SerialPort1 As IO.Ports.SerialPort Friend WithEvents CheckBox1 As CheckBox Friend WithEvents ToolStripLabel1 As ToolStripLabel Friend WithEvents ToolStripTextBox1 As ToolStripTextBox Friend WithEvents ToolStripTextBox2 As ToolStripTextBox Friend WithEvents ToolStripLabel2 As ToolStripLabel Friend WithEvents ToolStripButton3 As ToolStripButton Friend WithEvents ToolStripButton4 As ToolStripButton Friend WithEvents ToolStripButton5 As ToolStripButton Friend WithEvents SplitContainer2 As SplitContainer Friend WithEvents TextBox3 As TextBox Friend WithEvents Label4 As Label Friend WithEvents Button3 As Button Friend WithEvents TextBox1 As TextBox Friend WithEvents Label3 As Label Friend WithEvents Button4 As Button Friend WithEvents Panel1 As Panel End Class