📄 form0.frm
字号:
TabIndex = 57
Top = 120
Width = 1095
End
Begin VB.Label Label15
Caption = "平均周期参数："
Height = 255
Left = 120
TabIndex = 56
Top = 120
Width = 1335
End
End
Begin VB.PictureBox Picture4
Height = 7215
Left = 8040
ScaleHeight = 7155
ScaleWidth = 5115
TabIndex = 97
Top = 0
Visible = 0 'False
Width = 5175
Begin VB.Timer Timer5
Enabled = 0 'False
Interval = 500
Left = 4440
Top = 120
End
Begin VB.CommandButton Command13
Caption = "下 载"
Height = 270
Left = 1920
TabIndex = 121
Top = 3600
Width = 2895
End
Begin VB.CommandButton Command12
Caption = "默 认"
Height = 270
Left = 3480
TabIndex = 120
Top = 3120
Width = 1335
End
Begin VB.TextBox RZD
Alignment = 2 'Center
Height = 270
Left = 1920
TabIndex = 118
Text = "0"
Top = 3120
Width = 1335
End
Begin VB.TextBox H50
Alignment = 2 'Center
Height = 270
Left = 3480
TabIndex = 117
Text = "0"
Top = 2640
Width = 1335
End
Begin VB.TextBox L50
Alignment = 2 'Center
Height = 270
Left = 1920
TabIndex = 116
Text = "0"
Top = 2640
Width = 1335
End
Begin VB.TextBox H40
Alignment = 2 'Center
Height = 270
Left = 3480
TabIndex = 115
Text = "0"
Top = 2280
Width = 1335
End
Begin VB.TextBox L40
Alignment = 2 'Center
Height = 270
Left = 1920
TabIndex = 114
Text = "0"
Top = 2280
Width = 1335
End
Begin VB.TextBox H30
Alignment = 2 'Center
Height = 270
Left = 3480
TabIndex = 113
Text = "0"
Top = 1920
Width = 1335
End
Begin VB.TextBox L30
Alignment = 2 'Center
Height = 270
Left = 1920
TabIndex = 112
Text = "0"
Top = 1920
Width = 1335
End
Begin VB.TextBox H20
Alignment = 2 'Center
Height = 270
Left = 3480
TabIndex = 111
Text = "0"
Top = 1560
Width = 1335
End
Begin VB.TextBox L20
Alignment = 2 'Center
Height = 270
Left = 1920
TabIndex = 110
Text = "0"
Top = 1560
Width = 1335
End
Begin VB.TextBox H10
Alignment = 2 'Center
Height = 270
Left = 3480
TabIndex = 109
Text = "0"
Top = 1200
Width = 1335
End
Begin VB.TextBox L10
Alignment = 2 'Center
Height = 270
Left = 1920
TabIndex = 108
Text = "0"
Top = 1200
Width = 1335
End
Begin VB.Label Label36
Caption = "说明２：接地电阻上限指接地电阻多大，信号发生器才产生信号，否则停止产生信号． 指标范围：＞１００Ｋ"
Height = 615
Left = 240
TabIndex = 122
Top = 5160
Width = 4695
End
Begin VB.Label Label35
Caption = "接地电阻上限："
Height = 255
Left = 240
TabIndex = 119
Top = 3120
Width = 1455
End
Begin VB.Label Label34
Caption = "上限电流／ｍＡ"
Height = 255
Left = 3480
TabIndex = 107
Top = 840
Width = 1335
End
Begin VB.Label Label33
Caption = "下限电流／ｍＡ"
Height = 255
Left = 1920
TabIndex = 106
Top = 840
Width = 1455
End
Begin VB.Label Label32
BackStyle = 0 'Transparent
Caption = "５０Ｋ信号电阻："
Height = 255
Index = 4
Left = 240
TabIndex = 105
Top = 2640
Width = 1575
End
Begin VB.Label Label32
BackStyle = 0 'Transparent
Caption = "４０Ｋ信号电阻："
Height = 255
Index = 3
Left = 240
TabIndex = 104
Top = 2280
Width = 1575
End
Begin VB.Label Label32
BackStyle = 0 'Transparent
Caption = "３０Ｋ信号电阻："
Height = 255
Index = 2
Left = 240
TabIndex = 103
Top = 1920
Width = 1575
End
Begin VB.Label Label32
BackStyle = 0 'Transparent
Caption = "２０Ｋ信号电阻："
Height = 255
Index = 1
Left = 240
TabIndex = 102
Top = 1560
Width = 1575
End
Begin VB.Label Label32
BackStyle = 0 'Transparent
Caption = "１０Ｋ信号电阻："
Height = 255
Index = 0
Left = 240
TabIndex = 101
Top = 1200
Width = 1575
End
Begin VB.Label Label31
Caption = "稳定电流范围："
Height = 255
Left = 240
TabIndex = 100
Top = 840
Width = 2055
End
Begin VB.Label Label30
Caption = $"Form0.frx":1D5954
Height = 975
Left = 240
TabIndex = 99
Top = 4080
Width = 4695
End
Begin VB.Label Label29
Caption = "信号仪器参数设置:"
BeginProperty Font
Name = "黑体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 375
Left = 240
TabIndex = 98
Top = 120
Width = 4215
End
End
Begin VB.Label Label41
BackStyle = 0 'Transparent
Caption = "分析中..."
BeginProperty Font
Name = "黑体"
Size = 21.75
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H000000C0&
Height = 615
Left = 6480
TabIndex = 132
Top = 4800
Visible = 0 'False
Width = 2895
End
End
Begin MSCommLib.MSComm MScom
Left = 13680
Top = 9360
_ExtentX = 1005
_ExtentY = 1005
_Version = 393216
DTREnable = -1 'True
RThreshold = 7
End
Begin VB.CommandButton Command4
Caption = "设置串口"
Height = 255
Left = 13560
TabIndex = 22
Top = 9960
Visible = 0 'False
Width = 1575
End
Begin VB.Label Label44
Caption = "倍"
Height = 255
Left = 14880
TabIndex = 136
Top = 2520
Width = 255
End
Begin VB.Label Label43
Caption = "倍"
Height = 255
Left = 14040
TabIndex = 135
Top = 2520
Width = 255
End
Begin VB.Shape S
FillColor = &H000000FF&
Height = 255
Left = 14880
Shape = 2 'Oval
Top = 10440
Width = 255
End
Begin VB.Label Label42
Caption = "COM:"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 13560
TabIndex = 134
Top = 10440
Width = 615
End
Begin VB.Label Label40
Caption = "舍去数："
Height = 255
Left = 14400
TabIndex = 131
Top = 8640
Width = 735
End
Begin VB.Label Label39
Caption = "起始点："
Height = 255
Left = 14400
TabIndex = 130
Top = 8040
Width = 735
End
Begin VB.Label Label38
Caption = "异常数："
Height = 255
Left = 13560
TabIndex = 129
Top = 8640
Width = 735
End
Begin VB.Label Label37
Caption = "差异："
Height = 255
Left = 13560
TabIndex = 128
Top = 8040
Width = 735
End
Begin VB.Label L0
BackStyle = 0 'Transparent
Caption = "0"
Height = 255
Left = 14160
TabIndex = 24
Top = 3240
Width = 975
End
Begin VB.Label Label7
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "10"
Height = 255
Left = 14400
TabIndex = 21
Top = 2520
Width = 495
End
Begin VB.Label Label6
Alignment = 2 'Center
BackStyle = 0 'Transparent
Caption = "2"
Height = 255
Left = 13560
TabIndex = 20
Top = 2520
Width = 615
End
Begin VB.Label Label5
BackStyle = 0 'Transparent
Caption = "自动存盘路径:"
Height = 255
Left = 13560
TabIndex = 17
Top = 5880
Width = 1455
End
Begin VB.Label Label4
BackStyle = 0 'Transparent
Caption = "%"
Height = 255
Left = 14880
TabIndex = 16
Top = 4080
Width = 255
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -