📄 form1.frm
字号:
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00FF0000&
Height = 435
Left = 2730
TabIndex = 39
Top = 1440
Width = 345
End
Begin VB.Label Label15
BackColor = &H00008000&
BorderStyle = 1 'Fixed Single
ForeColor = &H000000FF&
Height = 45
Left = 390
TabIndex = 37
Top = 1080
Width = 5085
End
Begin VB.Label Label3
BackStyle = 0 'Transparent
Caption = "DIRECTION"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 495
Index = 1
Left = 3120
TabIndex = 27
Top = 2070
Width = 1305
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "FREQUENCY"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 375
Index = 10
Left = 90
TabIndex = 26
Top = 1440
Width = 1485
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "CURRENT"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 375
Index = 9
Left = 3120
TabIndex = 25
Top = 1440
Width = 1185
End
Begin VB.Label Label1
BackStyle = 0 'Transparent
Caption = "VOLTAGE"
BeginProperty Font
Name = "MS Sans Serif"
Size = 9.75
Charset = 0
Weight = 700
Underline = 0 'False
Italic = -1 'True
Strikethrough = 0 'False
EndProperty
ForeColor = &H00800000&
Height = 375
Index = 8
Left = 90
TabIndex = 24
Top = 2070
Width = 1335
End
Begin VB.Image Image5
BorderStyle = 1 'Fixed Single
Height = 3090
Left = -45
Picture = "Form1.frx":1EF32
Stretch = -1 'True
Top = -135
Width = 10005
End
End
Begin VB.Label lbInver
Alignment = 1 'Right Justify
BackColor = &H00404040&
Caption = "00.00"
BeginProperty Font
Name = "Arial"
Size = 14.25
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000C0&
Height = 330
Left = 1305
TabIndex = 144
Top = 1395
Width = 1185
End
Begin VB.Image Image2
Height = 6060
Left = -630
Picture = "Form1.frx":3D7D8
Stretch = -1 'True
Top = -360
Width = 6210
End
Begin VB.Shape Shape4
BackColor = &H00004000&
BackStyle = 1 'Opaque
BorderColor = &H0000FFFF&
BorderWidth = 2
Height = 2785
Left = 5050
Top = 2550
Width = 5825
End
Begin VB.Shape Shape3
BackColor = &H00004000&
BackStyle = 1 'Opaque
BorderColor = &H0000FFFF&
BorderWidth = 2
Height = 2355
Left = 5055
Top = 120
Width = 5820
End
Begin VB.Label Label14
BorderStyle = 1 'Fixed Single
Height = 5400
Left = 10920
TabIndex = 36
Top = 0
Width = 45
End
Begin VB.Label Label13
BorderStyle = 1 'Fixed Single
Height = 5400
Left = 0
TabIndex = 35
Top = 10
Width = 45
End
Begin VB.Label Label12
BorderStyle = 1 'Fixed Single
Height = 45
Left = 0
TabIndex = 34
Top = 5370
Width = 10965
End
Begin VB.Label Label11
BorderStyle = 1 'Fixed Single
Height = 60
Left = -60
TabIndex = 33
Top = 0
Width = 11055
End
Begin VB.Shape Shape2
BackColor = &H00004000&
BackStyle = 1 'Opaque
BorderColor = &H0000FFFF&
BorderWidth = 2
Height = 5205
Left = 90
Top = 120
Width = 4905
End
End
Begin MSCommLib.MSComm MSComm1
Left = 120
Top = 6165
_ExtentX = 1005
_ExtentY = 1005
_Version = 393216
DTREnable = -1 'True
ParityReplace = 0
RTSEnable = -1 'True
ParitySetting = 3
End
Begin VB.Timer TimerQuet
Enabled = 0 'False
Interval = 550
Left = 120
Top = 6750
End
Begin VB.Timer TimerDoi
Enabled = 0 'False
Interval = 200
Left = 120
Top = 7200
End
Begin VB.Frame Frame3
Caption = "Frame3"
Height = 60
Left = 10530
TabIndex = 1
Top = 7785
Width = 15
End
Begin VB.Frame fraMulti
Appearance = 0 'Flat
BackColor = &H0000C000&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 5415
Left = 3735
TabIndex = 0
Top = 420
Width = 10950
Begin VB.Frame Frame4
BackColor = &H0000C000&
BorderStyle = 0 'None
Height = 5055
Left = 120
TabIndex = 3
Top = 150
Width = 4875
Begin VB.Label lbSo
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "0.000"
BeginProperty Font
Name = "Arial"
Size = 36
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 885
Index = 0
Left = 855
TabIndex = 6
Top = 690
Width = 2445
End
Begin VB.Label lbSo
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "0.000"
BeginProperty Font
Name = "Arial"
Size = 36
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 675
Index = 2
Left = 855
TabIndex = 5
Top = 2880
Width = 2445
End
Begin VB.Label lbSo
Alignment = 1 'Right Justify
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "0.000"
BeginProperty Font
Name = "Arial"
Size = 36
Charset = 0
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H0000FFFF&
Height = 675
Index = 1
Left = 855
TabIndex = 4
Top = 1770
Width = 2445
End
Begin VB.Shape Shape1
BorderColor = &H00000080&
FillColor = &H00000080&
FillStyle = 0 'Solid
Height = 975
Index = 5
Left = 855
Top = 570
Width = 2670
End
Begin VB.Shape Shape1
BorderColor = &H00000080&
FillColor = &H00000080&
FillStyle = 0 'Solid
Height = 975
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -