389 lines
12 KiB
VB.net
389 lines
12 KiB
VB.net
<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(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()
|
|
components = New ComponentModel.Container()
|
|
btnSendReady = New Button()
|
|
ButtonSend3 = New Button()
|
|
ListBoxReceived = New ListBox()
|
|
ComboBoxPorts = New ComboBox()
|
|
ComboBoxBaud = New ComboBox()
|
|
ComboBoxHandshake = New ComboBox()
|
|
ButtonConnect = New Button()
|
|
ButtonDisconnect = New Button()
|
|
LabelStatus = New Label()
|
|
CheckBoxRTS = New CheckBox()
|
|
CheckBoxCTS = New CheckBox()
|
|
TimerCTS = New Timer(components)
|
|
GroupBox1 = New GroupBox()
|
|
btnPowerZone1Off = New Button()
|
|
btnPowerZone1On = New Button()
|
|
ButtonMasterVolDown = New Button()
|
|
ButtonMasterVolUp = New Button()
|
|
CheckBoxMasterMute = New CheckBox()
|
|
GroupBox2 = New GroupBox()
|
|
btnPowerZone2Off = New Button()
|
|
btnPowerZone2On = New Button()
|
|
ButtonZone2VolDown = New Button()
|
|
ButtonZone2VolUp = New Button()
|
|
CheckBoxZone2Mute = New CheckBox()
|
|
GroupBoxPower = New GroupBox()
|
|
btnPowerOff = New Button()
|
|
btnPowerOn = New Button()
|
|
txtPartialInput = New TextBox()
|
|
GroupBox1.SuspendLayout()
|
|
GroupBox2.SuspendLayout()
|
|
GroupBoxPower.SuspendLayout()
|
|
SuspendLayout()
|
|
'
|
|
' btnSendReady
|
|
'
|
|
btnSendReady.Location = New Point(18, 227)
|
|
btnSendReady.Name = "btnSendReady"
|
|
btnSendReady.Size = New Size(90, 23)
|
|
btnSendReady.TabIndex = 0
|
|
btnSendReady.Text = "Send Ready"
|
|
btnSendReady.UseVisualStyleBackColor = True
|
|
'
|
|
' ButtonSend3
|
|
'
|
|
ButtonSend3.Location = New Point(315, 227)
|
|
ButtonSend3.Name = "ButtonSend3"
|
|
ButtonSend3.Size = New Size(75, 23)
|
|
ButtonSend3.TabIndex = 2
|
|
ButtonSend3.Text = "Button3"
|
|
ButtonSend3.UseVisualStyleBackColor = True
|
|
'
|
|
' ListBoxReceived
|
|
'
|
|
ListBoxReceived.FormattingEnabled = True
|
|
ListBoxReceived.HorizontalScrollbar = True
|
|
ListBoxReceived.Location = New Point(12, 97)
|
|
ListBoxReceived.Name = "ListBoxReceived"
|
|
ListBoxReceived.Size = New Size(387, 124)
|
|
ListBoxReceived.TabIndex = 3
|
|
'
|
|
' ComboBoxPorts
|
|
'
|
|
ComboBoxPorts.FormattingEnabled = True
|
|
ComboBoxPorts.Location = New Point(6, 12)
|
|
ComboBoxPorts.Name = "ComboBoxPorts"
|
|
ComboBoxPorts.Size = New Size(68, 23)
|
|
ComboBoxPorts.TabIndex = 4
|
|
'
|
|
' ComboBoxBaud
|
|
'
|
|
ComboBoxBaud.FormattingEnabled = True
|
|
ComboBoxBaud.Location = New Point(80, 12)
|
|
ComboBoxBaud.Name = "ComboBoxBaud"
|
|
ComboBoxBaud.Size = New Size(75, 23)
|
|
ComboBoxBaud.TabIndex = 5
|
|
'
|
|
' ComboBoxHandshake
|
|
'
|
|
ComboBoxHandshake.FormattingEnabled = True
|
|
ComboBoxHandshake.Location = New Point(161, 12)
|
|
ComboBoxHandshake.Name = "ComboBoxHandshake"
|
|
ComboBoxHandshake.Size = New Size(157, 23)
|
|
ComboBoxHandshake.TabIndex = 6
|
|
'
|
|
' ButtonConnect
|
|
'
|
|
ButtonConnect.Enabled = False
|
|
ButtonConnect.Location = New Point(324, 12)
|
|
ButtonConnect.Name = "ButtonConnect"
|
|
ButtonConnect.Size = New Size(75, 23)
|
|
ButtonConnect.TabIndex = 7
|
|
ButtonConnect.Text = "Connect"
|
|
ButtonConnect.UseVisualStyleBackColor = True
|
|
'
|
|
' ButtonDisconnect
|
|
'
|
|
ButtonDisconnect.Enabled = False
|
|
ButtonDisconnect.Location = New Point(324, 41)
|
|
ButtonDisconnect.Name = "ButtonDisconnect"
|
|
ButtonDisconnect.Size = New Size(75, 23)
|
|
ButtonDisconnect.TabIndex = 8
|
|
ButtonDisconnect.Text = "Disconnect"
|
|
ButtonDisconnect.UseVisualStyleBackColor = True
|
|
'
|
|
' LabelStatus
|
|
'
|
|
LabelStatus.Location = New Point(6, 45)
|
|
LabelStatus.Name = "LabelStatus"
|
|
LabelStatus.Size = New Size(182, 19)
|
|
LabelStatus.TabIndex = 9
|
|
LabelStatus.Text = "Serial Port Status Appears Here"
|
|
'
|
|
' CheckBoxRTS
|
|
'
|
|
CheckBoxRTS.AutoSize = True
|
|
CheckBoxRTS.Location = New Point(194, 44)
|
|
CheckBoxRTS.Name = "CheckBoxRTS"
|
|
CheckBoxRTS.Size = New Size(58, 19)
|
|
CheckBoxRTS.TabIndex = 10
|
|
CheckBoxRTS.Text = "RTS(7)"
|
|
CheckBoxRTS.UseVisualStyleBackColor = True
|
|
'
|
|
' CheckBoxCTS
|
|
'
|
|
CheckBoxCTS.AutoSize = True
|
|
CheckBoxCTS.Checked = True
|
|
CheckBoxCTS.CheckState = CheckState.Indeterminate
|
|
CheckBoxCTS.Enabled = False
|
|
CheckBoxCTS.Location = New Point(258, 44)
|
|
CheckBoxCTS.Name = "CheckBoxCTS"
|
|
CheckBoxCTS.Size = New Size(60, 19)
|
|
CheckBoxCTS.TabIndex = 11
|
|
CheckBoxCTS.Text = "CTS(8)"
|
|
CheckBoxCTS.ThreeState = True
|
|
CheckBoxCTS.UseVisualStyleBackColor = True
|
|
'
|
|
' TimerCTS
|
|
'
|
|
'
|
|
' GroupBox1
|
|
'
|
|
GroupBox1.Controls.Add(btnPowerZone1Off)
|
|
GroupBox1.Controls.Add(btnPowerZone1On)
|
|
GroupBox1.Controls.Add(ButtonMasterVolDown)
|
|
GroupBox1.Controls.Add(ButtonMasterVolUp)
|
|
GroupBox1.Controls.Add(CheckBoxMasterMute)
|
|
GroupBox1.FlatStyle = FlatStyle.Flat
|
|
GroupBox1.Location = New Point(12, 256)
|
|
GroupBox1.Name = "GroupBox1"
|
|
GroupBox1.Size = New Size(84, 168)
|
|
GroupBox1.TabIndex = 13
|
|
GroupBox1.TabStop = False
|
|
GroupBox1.Text = "Zone 1"
|
|
'
|
|
' btnPowerZone1Off
|
|
'
|
|
btnPowerZone1Off.Location = New Point(6, 56)
|
|
btnPowerZone1Off.Name = "btnPowerZone1Off"
|
|
btnPowerZone1Off.Size = New Size(66, 23)
|
|
btnPowerZone1Off.TabIndex = 19
|
|
btnPowerZone1Off.Text = "O&ff"
|
|
btnPowerZone1Off.UseVisualStyleBackColor = True
|
|
'
|
|
' btnPowerZone1On
|
|
'
|
|
btnPowerZone1On.Location = New Point(6, 27)
|
|
btnPowerZone1On.Name = "btnPowerZone1On"
|
|
btnPowerZone1On.Size = New Size(66, 23)
|
|
btnPowerZone1On.TabIndex = 18
|
|
btnPowerZone1On.Text = "&On"
|
|
btnPowerZone1On.UseVisualStyleBackColor = True
|
|
'
|
|
' ButtonMasterVolDown
|
|
'
|
|
ButtonMasterVolDown.Location = New Point(6, 114)
|
|
ButtonMasterVolDown.Name = "ButtonMasterVolDown"
|
|
ButtonMasterVolDown.Size = New Size(66, 23)
|
|
ButtonMasterVolDown.TabIndex = 15
|
|
ButtonMasterVolDown.Text = "Vol Down"
|
|
ButtonMasterVolDown.UseVisualStyleBackColor = True
|
|
'
|
|
' ButtonMasterVolUp
|
|
'
|
|
ButtonMasterVolUp.Location = New Point(6, 85)
|
|
ButtonMasterVolUp.Name = "ButtonMasterVolUp"
|
|
ButtonMasterVolUp.Size = New Size(66, 23)
|
|
ButtonMasterVolUp.TabIndex = 14
|
|
ButtonMasterVolUp.Text = "Vol Up"
|
|
ButtonMasterVolUp.UseVisualStyleBackColor = True
|
|
'
|
|
' CheckBoxMasterMute
|
|
'
|
|
CheckBoxMasterMute.AutoSize = True
|
|
CheckBoxMasterMute.Location = New Point(6, 143)
|
|
CheckBoxMasterMute.Name = "CheckBoxMasterMute"
|
|
CheckBoxMasterMute.Size = New Size(54, 19)
|
|
CheckBoxMasterMute.TabIndex = 13
|
|
CheckBoxMasterMute.Text = "Mute"
|
|
CheckBoxMasterMute.UseVisualStyleBackColor = True
|
|
'
|
|
' GroupBox2
|
|
'
|
|
GroupBox2.Controls.Add(btnPowerZone2Off)
|
|
GroupBox2.Controls.Add(btnPowerZone2On)
|
|
GroupBox2.Controls.Add(ButtonZone2VolDown)
|
|
GroupBox2.Controls.Add(ButtonZone2VolUp)
|
|
GroupBox2.Controls.Add(CheckBoxZone2Mute)
|
|
GroupBox2.FlatStyle = FlatStyle.Flat
|
|
GroupBox2.Location = New Point(104, 256)
|
|
GroupBox2.Name = "GroupBox2"
|
|
GroupBox2.Size = New Size(84, 168)
|
|
GroupBox2.TabIndex = 14
|
|
GroupBox2.TabStop = False
|
|
GroupBox2.Text = "Zone 2"
|
|
'
|
|
' btnPowerZone2Off
|
|
'
|
|
btnPowerZone2Off.Location = New Point(6, 56)
|
|
btnPowerZone2Off.Name = "btnPowerZone2Off"
|
|
btnPowerZone2Off.Size = New Size(66, 23)
|
|
btnPowerZone2Off.TabIndex = 21
|
|
btnPowerZone2Off.Text = "O&ff"
|
|
btnPowerZone2Off.UseVisualStyleBackColor = True
|
|
'
|
|
' btnPowerZone2On
|
|
'
|
|
btnPowerZone2On.Location = New Point(6, 27)
|
|
btnPowerZone2On.Name = "btnPowerZone2On"
|
|
btnPowerZone2On.Size = New Size(66, 23)
|
|
btnPowerZone2On.TabIndex = 20
|
|
btnPowerZone2On.Text = "&On"
|
|
btnPowerZone2On.UseVisualStyleBackColor = True
|
|
'
|
|
' ButtonZone2VolDown
|
|
'
|
|
ButtonZone2VolDown.Location = New Point(6, 114)
|
|
ButtonZone2VolDown.Name = "ButtonZone2VolDown"
|
|
ButtonZone2VolDown.Size = New Size(66, 23)
|
|
ButtonZone2VolDown.TabIndex = 15
|
|
ButtonZone2VolDown.Text = "Vol Down"
|
|
ButtonZone2VolDown.UseVisualStyleBackColor = True
|
|
'
|
|
' ButtonZone2VolUp
|
|
'
|
|
ButtonZone2VolUp.Location = New Point(6, 85)
|
|
ButtonZone2VolUp.Name = "ButtonZone2VolUp"
|
|
ButtonZone2VolUp.Size = New Size(66, 23)
|
|
ButtonZone2VolUp.TabIndex = 14
|
|
ButtonZone2VolUp.Text = "Vol Up"
|
|
ButtonZone2VolUp.UseVisualStyleBackColor = True
|
|
'
|
|
' CheckBoxZone2Mute
|
|
'
|
|
CheckBoxZone2Mute.AutoSize = True
|
|
CheckBoxZone2Mute.Location = New Point(6, 143)
|
|
CheckBoxZone2Mute.Name = "CheckBoxZone2Mute"
|
|
CheckBoxZone2Mute.Size = New Size(54, 19)
|
|
CheckBoxZone2Mute.TabIndex = 13
|
|
CheckBoxZone2Mute.Text = "Mute"
|
|
CheckBoxZone2Mute.UseVisualStyleBackColor = True
|
|
'
|
|
' GroupBoxPower
|
|
'
|
|
GroupBoxPower.Controls.Add(btnPowerOff)
|
|
GroupBoxPower.Controls.Add(btnPowerOn)
|
|
GroupBoxPower.FlatStyle = FlatStyle.Flat
|
|
GroupBoxPower.Location = New Point(315, 341)
|
|
GroupBoxPower.Name = "GroupBoxPower"
|
|
GroupBoxPower.Size = New Size(84, 83)
|
|
GroupBoxPower.TabIndex = 15
|
|
GroupBoxPower.TabStop = False
|
|
GroupBoxPower.Text = "Power"
|
|
'
|
|
' btnPowerOff
|
|
'
|
|
btnPowerOff.Location = New Point(6, 51)
|
|
btnPowerOff.Name = "btnPowerOff"
|
|
btnPowerOff.Size = New Size(66, 23)
|
|
btnPowerOff.TabIndex = 18
|
|
btnPowerOff.Text = "O&ff"
|
|
btnPowerOff.UseVisualStyleBackColor = True
|
|
'
|
|
' btnPowerOn
|
|
'
|
|
btnPowerOn.Location = New Point(6, 22)
|
|
btnPowerOn.Name = "btnPowerOn"
|
|
btnPowerOn.Size = New Size(66, 23)
|
|
btnPowerOn.TabIndex = 17
|
|
btnPowerOn.Text = "&On"
|
|
btnPowerOn.UseVisualStyleBackColor = True
|
|
'
|
|
' txtPartialInput
|
|
'
|
|
txtPartialInput.Location = New Point(12, 70)
|
|
txtPartialInput.Name = "txtPartialInput"
|
|
txtPartialInput.Size = New Size(387, 23)
|
|
txtPartialInput.TabIndex = 16
|
|
txtPartialInput.Text = "partial messages appear here..."
|
|
'
|
|
' Form1
|
|
'
|
|
AutoScaleDimensions = New SizeF(7F, 15F)
|
|
AutoScaleMode = AutoScaleMode.Font
|
|
AutoSize = True
|
|
AutoSizeMode = AutoSizeMode.GrowAndShrink
|
|
ClientSize = New Size(413, 436)
|
|
Controls.Add(txtPartialInput)
|
|
Controls.Add(GroupBoxPower)
|
|
Controls.Add(GroupBox2)
|
|
Controls.Add(GroupBox1)
|
|
Controls.Add(CheckBoxCTS)
|
|
Controls.Add(CheckBoxRTS)
|
|
Controls.Add(LabelStatus)
|
|
Controls.Add(ButtonDisconnect)
|
|
Controls.Add(ButtonConnect)
|
|
Controls.Add(ComboBoxHandshake)
|
|
Controls.Add(ComboBoxBaud)
|
|
Controls.Add(ComboBoxPorts)
|
|
Controls.Add(ListBoxReceived)
|
|
Controls.Add(ButtonSend3)
|
|
Controls.Add(btnSendReady)
|
|
Name = "Form1"
|
|
RightToLeft = RightToLeft.No
|
|
Text = "Yamaha RX-2400 Controller"
|
|
GroupBox1.ResumeLayout(False)
|
|
GroupBox1.PerformLayout()
|
|
GroupBox2.ResumeLayout(False)
|
|
GroupBox2.PerformLayout()
|
|
GroupBoxPower.ResumeLayout(False)
|
|
ResumeLayout(False)
|
|
PerformLayout()
|
|
End Sub
|
|
|
|
Friend WithEvents btnSendReady As Button
|
|
Friend WithEvents ButtonSend3 As Button
|
|
Friend WithEvents ListBoxReceived As ListBox
|
|
Friend WithEvents ComboBoxPorts As ComboBox
|
|
Friend WithEvents ComboBoxBaud As ComboBox
|
|
Friend WithEvents ComboBoxHandshake As ComboBox
|
|
Friend WithEvents ButtonConnect As Button
|
|
Friend WithEvents ButtonDisconnect As Button
|
|
Friend WithEvents LabelStatus As Label
|
|
Friend WithEvents CheckBoxRTS As CheckBox
|
|
Friend WithEvents CheckBoxCTS As CheckBox
|
|
Friend WithEvents TimerCTS As Timer
|
|
Friend WithEvents GroupBox1 As GroupBox
|
|
Friend WithEvents CheckBoxMasterMute As CheckBox
|
|
Friend WithEvents ButtonMasterVolDown As Button
|
|
Friend WithEvents ButtonMasterVolUp As Button
|
|
Friend WithEvents GroupBox2 As GroupBox
|
|
Friend WithEvents ButtonZone2VolDown As Button
|
|
Friend WithEvents ButtonZone2VolUp As Button
|
|
Friend WithEvents CheckBoxZone2Mute As CheckBox
|
|
Friend WithEvents GroupBoxPower As GroupBox
|
|
Friend WithEvents txtPartialInput As TextBox
|
|
Friend WithEvents btnPowerZone1On As Button
|
|
Friend WithEvents btnPowerOff As Button
|
|
Friend WithEvents btnPowerOn As Button
|
|
Friend WithEvents btnPowerZone1Off As Button
|
|
Friend WithEvents btnPowerZone2Off As Button
|
|
Friend WithEvents btnPowerZone2On As Button
|
|
|
|
End Class
|