📄 pl33_1.frm
字号:
VERSION 5.00
Begin VB.Form Form1
BackColor = &H00FF0000&
BorderStyle = 1 'Fixed Single
Caption = "电子琴"
ClientHeight = 2445
ClientLeft = 150
ClientTop = 720
ClientWidth = 9345
FillColor = &H00C00000&
ForeColor = &H00FFFFFF&
Icon = "Pl33_1.frx":0000
LinkTopic = "Form1"
MaxButton = 0 'False
ScaleHeight = 2445
ScaleWidth = 9345
StartUpPosition = 3 '窗口缺省
Begin VB.Timer Timer2
Enabled = 0 'False
Interval = 150
Left = 60
Top = 0
End
Begin VB.CommandButton Command2
BackColor = &H00FF0000&
Caption = "示范演奏"
Height = 255
Left = 4560
Style = 1 'Graphical
TabIndex = 77
Top = 180
Width = 1335
End
Begin VB.Frame Frame1
BackColor = &H00FF0000&
Height = 555
Left = 240
TabIndex = 72
Top = 420
Width = 6435
Begin VB.ComboBox ComDevies
BackColor = &H00FF8080&
ForeColor = &H00FFFFFF&
Height = 300
Left = 660
Style = 2 'Dropdown List
TabIndex = 74
Top = 180
Width = 2835
End
Begin VB.ComboBox ComSounds
BackColor = &H00FF8080&
ForeColor = &H00FFFFFF&
Height = 300
Left = 4500
Style = 2 'Dropdown List
TabIndex = 73
Top = 180
Width = 1815
End
Begin VB.Label Label4
BackColor = &H00FF0000&
Caption = "设备∶"
ForeColor = &H00FFFFFF&
Height = 255
Index = 0
Left = 120
TabIndex = 76
Top = 240
Width = 915
End
Begin VB.Label Label4
BackColor = &H00FF0000&
Caption = "乐器∶"
ForeColor = &H00FFFFFF&
Height = 255
Index = 1
Left = 3960
TabIndex = 75
Top = 240
Width = 915
End
End
Begin VB.CommandButton Command1
BackColor = &H00FF0000&
Caption = "电源"
Height = 255
Left = 5940
MaskColor = &H00404040&
Style = 1 'Graphical
TabIndex = 68
Top = 180
Width = 735
End
Begin VB.Frame Frame2
BackColor = &H00FF0000&
Height = 855
Left = 6780
TabIndex = 67
Top = 120
Width = 2355
Begin VB.HScrollBar HScroll2
Height = 255
Left = 660
Max = 127
TabIndex = 78
Top = 540
Width = 1575
End
Begin VB.HScrollBar HScroll1
Height = 255
Left = 660
Max = 63
TabIndex = 69
Top = 180
Width = 1035
End
Begin VB.Label Label5
BackColor = &H00C00000&
Caption = "音量∶"
ForeColor = &H00FFFFFF&
Height = 195
Left = 120
TabIndex = 79
Top = 540
Width = 675
End
Begin VB.Label Label2
Alignment = 2 'Center
BackColor = &H00FFFFFF&
BorderStyle = 1 'Fixed Single
Caption = "Label2"
Height = 255
Left = 1800
TabIndex = 71
Top = 180
Width = 375
End
Begin VB.Label Label7
BackColor = &H00C00000&
Caption = "音调∶"
ForeColor = &H00FFFFFF&
Height = 195
Left = 120
TabIndex = 70
Top = 240
Width = 915
End
End
Begin VB.Timer Timer1
Interval = 100
Left = 480
Top = 0
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 1
Left = 300
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 64
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 3
Left = 540
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 63
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 6
Left = 1020
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 62
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 8
Left = 1260
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 61
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 10
Left = 1500
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 60
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 13
Left = 1980
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 59
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 15
Left = 2220
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 58
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 18
Left = 2700
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 57
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 20
Left = 2940
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 56
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 22
Left = 3180
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 55
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 25
Left = 3660
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 54
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 27
Left = 3900
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 53
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 30
Left = 4380
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 52
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 32
Left = 4620
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 51
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 34
Left = 4860
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 50
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 37
Left = 5340
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 49
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 39
Left = 5580
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 48
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 42
Left = 6060
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 47
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
Index = 44
Left = 6300
ScaleHeight = 585
ScaleWidth = 105
TabIndex = 46
Top = 1380
Width = 135
End
Begin VB.PictureBox Picture1
Appearance = 0 'Flat
BackColor = &H00000000&
ForeColor = &H80000008&
Height = 615
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -