📄 无线温度监控系统.frm
字号:
VERSION 5.00
Object = "{648A5603-2C6E-101B-82B6-000000000014}#1.1#0"; "Mscomm32.ocx"
Begin VB.Form 无线温度监控系统
Caption = "无线温度监控系统"
ClientHeight = 7470
ClientLeft = 60
ClientTop = 450
ClientWidth = 13875
BeginProperty Font
Name = "宋体"
Size = 10.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000000&
Icon = "无线温度监控系统.frx":0000
LinkTopic = "Form1"
ScaleHeight = 7470
ScaleWidth = 13875
StartUpPosition = 3 '窗口缺省
Begin VB.Frame Frame4
Caption = "温度/℃"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1575
Left = 11160
TabIndex = 44
Top = 3120
Width = 2655
Begin VB.TextBox tInL
Alignment = 1 'Right Justify
DataSource = "Adodc1"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 270
Left = 960
Locked = -1 'True
TabIndex = 52
Text = "0"
Top = 1080
Width = 615
End
Begin VB.TextBox tOutH
Alignment = 1 'Right Justify
DataSource = "Adodc1"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 270
Left = 1800
Locked = -1 'True
TabIndex = 51
Text = "0"
Top = 600
Width = 615
End
Begin VB.TextBox tOutL
Alignment = 1 'Right Justify
DataSource = "Adodc1"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 270
Left = 1800
Locked = -1 'True
TabIndex = 50
Text = "0"
Top = 1080
Width = 615
End
Begin VB.TextBox tInH
Alignment = 1 'Right Justify
DataSource = "Adodc1"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000006&
Height = 270
Left = 960
Locked = -1 'True
TabIndex = 45
Text = "0"
Top = 600
Width = 615
End
Begin VB.Label Label19
Caption = "最低温度"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 49
Top = 1080
Width = 735
End
Begin VB.Label Label18
Caption = "最高温度"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 48
Top = 600
Width = 735
End
Begin VB.Label Label17
AutoSize = -1 'True
Caption = "室 外"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 180
Left = 1920
TabIndex = 47
Top = 240
Width = 450
End
Begin VB.Label Label16
AutoSize = -1 'True
Caption = "室 内"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 180
Left = 1080
TabIndex = 46
Top = 240
Width = 450
End
End
Begin VB.Frame Frame3
Caption = "曲线设置"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 1935
Left = 11160
TabIndex = 34
Top = 4920
Width = 2655
Begin VB.CommandButton Command1
Caption = "历史记录"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 240
TabIndex = 53
Top = 1320
Width = 975
End
Begin VB.CommandButton butMakeSure
Caption = "确 定"
Default = -1 'True
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1560
TabIndex = 43
Top = 1320
Width = 975
End
Begin VB.TextBox high
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 270
Left = 1680
TabIndex = 40
Text = "40"
Top = 840
Width = 495
End
Begin VB.TextBox low
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 270
Left = 960
TabIndex = 38
Text = "0"
Top = 840
Width = 495
End
Begin VB.TextBox timezq
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 270
Left = 960
TabIndex = 36
Text = "5"
Top = 360
Width = 615
End
Begin VB.ComboBox cobDW
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 300
ItemData = "无线温度监控系统.frx":0CCA
Left = 1680
List = "无线温度监控系统.frx":0CE0
OLEDragMode = 1 'Automatic
TabIndex = 35
Text = "分钟"
Top = 360
Width = 855
End
Begin VB.Label Label4
Caption = "℃"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Index = 3
Left = 2280
TabIndex = 42
Top = 840
Width = 255
End
Begin VB.Label Label15
Caption = "～"
Height = 255
Left = 1440
TabIndex = 41
Top = 840
Width = 255
End
Begin VB.Label Label14
Caption = "温度范围"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 39
Top = 840
Width = 735
End
Begin VB.Label Label13
Caption = "时间周期"
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 255
Left = 120
TabIndex = 37
Top = 360
Width = 735
End
End
Begin VB.PictureBox Pic2
BorderStyle = 0 'None
Height = 6135
Left = 2640
ScaleHeight = 6135
ScaleWidth = 375
TabIndex = 29
Top = 1080
Width = 375
End
Begin MSCommLib.MSComm MSComm1
Left = 1680
Top = 240
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -