📄 frmcurve.frm
字号:
VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "comdlg32.ocx"
Begin VB.Form frmCurve
BorderStyle = 3 'Fixed Dialog
Caption = "曲线测试"
ClientHeight = 9405
ClientLeft = 1230
ClientTop = 1500
ClientWidth = 13080
Icon = "frmCurve.frx":0000
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MinButton = 0 'False
ScaleHeight = 9405
ScaleWidth = 13080
ShowInTaskbar = 0 'False
Begin VB.Timer Timer3
Enabled = 0 'False
Interval = 100
Left = 0
Top = 0
End
Begin VB.PictureBox picColor
BackColor = &H000000FF&
Height = 255
Index = 2
Left = 3240
ScaleHeight = 195
ScaleWidth = 435
TabIndex = 88
Top = 8160
Width = 495
End
Begin VB.PictureBox picColor
BackColor = &H000000FF&
Height = 255
Index = 1
Left = 3240
ScaleHeight = 195
ScaleWidth = 435
TabIndex = 87
Top = 7740
Width = 495
End
Begin VB.PictureBox picColor
BackColor = &H000000FF&
Height = 255
Index = 0
Left = 3240
ScaleHeight = 195
ScaleWidth = 435
TabIndex = 86
Top = 7320
Width = 495
End
Begin VB.CommandButton Command1
Caption = "打 印"
Height = 375
Left = 240
TabIndex = 85
Top = 5760
Width = 975
End
Begin VB.CommandButton cmdGridShow
Caption = "网格"
Height = 375
Left = 240
TabIndex = 84
Top = 5040
Width = 975
End
Begin VB.Timer Timer2
Enabled = 0 'False
Interval = 500
Left = 1080
Top = 6840
End
Begin VB.Timer Timer1
Enabled = 0 'False
Interval = 500
Left = 480
Top = 6840
End
Begin VB.PictureBox Pct1
BackColor = &H80000007&
Height = 6855
Left = 1560
ScaleHeight = 6795
ScaleWidth = 11355
TabIndex = 51
Top = 0
Width = 11415
End
Begin VB.CheckBox ckCurve
BackColor = &H80000004&
Caption = "曲线3"
ForeColor = &H0000FFFF&
Height = 255
Index = 2
Left = 1560
TabIndex = 50
Top = 8160
Value = 1 'Checked
Width = 1095
End
Begin VB.CheckBox ckCurve
Caption = "曲线2"
ForeColor = &H0000FF00&
Height = 255
Index = 1
Left = 1560
TabIndex = 49
Top = 7740
Value = 1 'Checked
Width = 1095
End
Begin VB.CheckBox ckCurve
BackColor = &H00C0C0C0&
Caption = "曲线1"
ForeColor = &H000000FF&
Height = 255
Index = 0
Left = 1560
TabIndex = 48
Top = 7320
UseMaskColor = -1 'True
Value = 1 'Checked
Width = 1095
End
Begin VB.PictureBox Picture2
Height = 1095
Left = 9960
ScaleHeight = 1035
ScaleWidth = 2955
TabIndex = 23
Top = 7320
Width = 3015
Begin VB.Label lbXY
Alignment = 2 'Center
Caption = "0:0"
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 24
Top = 480
Width = 2775
End
End
Begin VB.TextBox txtRate
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 2
Left = 7680
TabIndex = 22
Text = "0"
Top = 8040
Width = 1215
End
Begin VB.TextBox txtRate
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 7680
TabIndex = 21
Text = "0"
Top = 7680
Width = 1215
End
Begin VB.TextBox txtRate
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 7680
TabIndex = 20
Text = "0"
Top = 7320
Width = 1215
End
Begin VB.TextBox txtTemp
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 2
Left = 6240
TabIndex = 19
Text = "0"
Top = 8040
Width = 1095
End
Begin VB.TextBox txtTemp
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 6240
TabIndex = 18
Text = "0"
Top = 7680
Width = 1095
End
Begin VB.TextBox txtTemp
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 6240
TabIndex = 17
Text = "0"
Top = 7320
Width = 1095
End
Begin VB.TextBox txtTime
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 2
Left = 4800
TabIndex = 16
Text = "00:00"
Top = 8040
Width = 1095
End
Begin VB.TextBox txtTime
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 1
Left = 4800
TabIndex = 15
Text = "00:00"
Top = 7680
Width = 1095
End
Begin VB.TextBox txtTime
Alignment = 2 'Center
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Index = 0
Left = 4800
TabIndex = 14
Text = "00:00"
Top = 7320
Width = 1095
End
Begin VB.CommandButton cmdSet
Caption = "设 置"
Height = 375
Left = 240
TabIndex = 11
Top = 6480
Width = 975
End
Begin VB.CommandButton cmdY
Caption = "Y 线"
Height = 375
Left = 240
TabIndex = 10
Top = 5040
Visible = 0 'False
Width = 975
End
Begin VB.CommandButton cmdX
Caption = "X 线"
Height = 375
Left = 240
TabIndex = 9
Top = 5000
Visible = 0 'False
Width = 975
End
Begin VB.CommandButton cmdRestore
Caption = "恢 复"
Enabled = 0 'False
Height = 375
Left = 240
TabIndex = 8
Top = 4320
Width = 975
End
Begin VB.CommandButton cmdLarge
Caption = "放 大"
Enabled = 0 'False
Height = 375
Left = 240
TabIndex = 7
Top = 3640
Width = 975
End
Begin VB.CommandButton cmdMove
Caption = "移 动"
Enabled = 0 'False
Height = 375
Index = 0
Left = 240
TabIndex = 6
Top = 2960
Width = 975
End
Begin VB.CommandButton cmdStop
Caption = "停 止"
Enabled = 0 'False
Height = 375
Left = 240
TabIndex = 5
Top = 2280
Width = 975
End
Begin VB.CommandButton cmdStart
Caption = "开 始"
Height = 375
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -