📄 midi.frm
字号:
VERSION 5.00
Object = "*\A..\SOURCE\FAST2003.vbp"
Object = "*\A..\SOURCE\FAST2007.vbp"
Begin VB.Form frmMIDI
AutoRedraw = -1 'True
BorderStyle = 3 'Fixed Dialog
Caption = "MIDI Instruments"
ClientHeight = 1995
ClientLeft = 75
ClientTop = 1560
ClientWidth = 9510
BeginProperty Font
Name = "MS Sans Serif"
Size = 8.25
Charset = 0
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Icon = "MIDI.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
PaletteMode = 1 'UseZOrder
ScaleHeight = 1995
ScaleWidth = 9510
ShowInTaskbar = 0 'False
StartUpPosition = 2 'CenterScreen
Begin VB.Frame fraPatch
Caption = "Instrument"
Height = 690
Left = 5130
TabIndex = 74
Top = 90
Width = 2670
Begin VB.HScrollBar hsPatch
Height = 255
LargeChange = 10
Left = 90
Max = 127
TabIndex = 75
Top = 315
Value = 1
Width = 2475
End
End
Begin VB.Frame fraBalance
Caption = "L Balance R"
Height = 690
Left = 7920
TabIndex = 72
Top = 90
Width = 1500
Begin VB.HScrollBar hsBalance
Height = 255
LargeChange = 10
Left = 90
Max = 127
TabIndex = 73
Top = 315
Width = 1320
End
End
Begin VB.Frame fraOctave
Caption = "Octave"
Height = 690
Left = 3780
TabIndex = 70
Top = 90
Width = 1275
Begin VB.HScrollBar hsOctave
Height = 255
Left = 90
Max = 4
TabIndex = 71
Top = 315
Value = 2
Width = 1080
End
End
Begin VB.Frame fraVolume
Caption = "Volume"
Height = 690
Left = 1935
TabIndex = 68
Top = 90
Width = 1770
Begin VB.HScrollBar hsVolume
Height = 255
LargeChange = 10
Left = 90
Max = 127
TabIndex = 69
Top = 315
Value = 50
Width = 1575
End
End
Begin VB.Frame fraChannel
Caption = "Channel"
Height = 690
Left = 90
TabIndex = 66
Top = 90
Width = 1770
Begin VB.HScrollBar hsMIDIChannel
Height = 255
Left = 90
Max = 15
TabIndex = 67
Top = 315
Value = 1
Width = 1590
End
End
Begin VB.PictureBox Panel3D3
AutoSize = -1 'True
ForeColor = &H00808080&
Height = 1065
Left = 90
ScaleHeight = 1005
ScaleWidth = 9300
TabIndex = 0
Top = 900
Width = 9360
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 61
Left = 8640
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 62
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 63
Left = 8910
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 61
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 1
Left = 240
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 53
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 3
Left = 480
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 52
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 6
Left = 960
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 51
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 8
Left = 1200
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 50
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 10
Left = 1440
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 49
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 13
Left = 1920
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 20
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 15
Left = 2160
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 19
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 20
Left = 2880
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 18
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 22
Left = 3120
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 17
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 25
Left = 3600
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 16
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 27
Left = 3840
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 15
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 32
Left = 4560
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 14
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 34
Left = 4800
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 13
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 37
Left = 5280
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 12
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 39
Left = 5520
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 11
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 44
Left = 6240
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 10
Top = 90
Width = 165
End
Begin VB.PictureBox Note
AutoRedraw = -1 'True
BackColor = &H00000000&
DragMode = 1 'Automatic
ForeColor = &H00808080&
Height = 585
Index = 46
Left = 6480
ScaleHeight = 525
ScaleWidth = 105
TabIndex = 9
Top = 90
Width = 165
End
Begin VB.PictureBox Note
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -