📄 gylc1frm.frm
字号:
VERSION 5.00
Begin VB.Form gylc1frm
BackColor = &H00C0C0C0&
BorderStyle = 1 'Fixed Single
ClientHeight = 8070
ClientLeft = 15
ClientTop = 15
ClientWidth = 10080
ControlBox = 0 'False
LinkTopic = "Form1"
LockControls = -1 'True
MaxButton = 0 'False
MDIChild = -1 'True
MinButton = 0 'False
Moveable = 0 'False
ScaleHeight = 8070
ScaleWidth = 10080
Begin VB.CommandButton Command5
BackColor = &H80000000&
Cancel = -1 'True
Caption = "退出&B"
BeginProperty Font
Name = "隶书"
Size = 9
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 492
Left = 3960
MouseIcon = "gylc1frm.frx":0000
MousePointer = 99 'Custom
Picture = "gylc1frm.frx":0152
Style = 1 'Graphical
TabIndex = 0
ToolTipText = "退出本窗口"
Top = 5556
Width = 612
End
Begin VB.TextBox txtjlgYeWei
Appearance = 0 'Flat
BackColor = &H80000000&
BorderStyle = 0 'None
ForeColor = &H00004040&
Height = 264
Left = 1836
TabIndex = 24
TabStop = 0 'False
Text = "t"
Top = 1100
Width = 972
End
Begin VB.TextBox txtfyfWenDu
Appearance = 0 'Flat
BackColor = &H80000000&
BorderStyle = 0 'None
ForeColor = &H00004040&
Height = 264
Left = 5220
TabIndex = 13
TabStop = 0 'False
Text = "t"
Top = 4448
Width = 960
End
Begin VB.TextBox txttlfKaiDu
Appearance = 0 'Flat
BackColor = &H80000000&
BorderStyle = 0 'None
ForeColor = &H00004040&
Height = 264
Left = 2064
TabIndex = 12
TabStop = 0 'False
Text = "t"
Top = 3350
Width = 972
End
Begin VB.TextBox txttlfLiuLiang
Appearance = 0 'Flat
BackColor = &H80000000&
BorderStyle = 0 'None
BeginProperty Font
Name = "宋体"
Size = 9
Charset = 134
Weight = 400
Underline = -1 'True
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00004040&
Height = 230
Left = 3912
TabIndex = 11
TabStop = 0 'False
Text = "t"
Top = 2580
Width = 972
End
Begin VB.PictureBox picLiuCheng
AutoSize = -1 'True
Height = 6630
Left = 120
Picture = "gylc1frm.frx":0314
ScaleHeight = 6570
ScaleMode = 0 'User
ScaleWidth = 8865
TabIndex = 1
TabStop = 0 'False
Top = 80
Width = 8925
Begin VB.TextBox txtJingZhiLiang
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 228
Left = 2360
Locked = -1 'True
TabIndex = 29
TabStop = 0 'False
Text = " "
Top = 3900
Width = 708
End
Begin VB.PictureBox picFaMen
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 975
Left = 1920
Picture = "gylc1frm.frx":BE1F6
ScaleHeight = 975
ScaleWidth = 960
TabIndex = 3
TabStop = 0 'False
Top = 2290
Width = 960
End
Begin VB.PictureBox picLiuDong
BackColor = &H0080FFFF&
Height = 170
Left = 1180
ScaleHeight = 105
ScaleWidth = 4095
TabIndex = 25
Top = 2915
Visible = 0 'False
Width = 4150
Begin VB.Timer tmrLiuDong
Left = 2280
Top = 0
End
End
Begin VB.Timer tmrFanYingTime
Enabled = 0 'False
Interval = 1000
Left = 3480
Top = 4920
End
Begin VB.Timer tmrCaiYang
Interval = 1000
Left = 6720
Top = 0
End
Begin VB.TextBox txtTime
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 228
Left = 2360
Locked = -1 'True
TabIndex = 22
TabStop = 0 'False
Text = " "
Top = 5256
Width = 828
End
Begin VB.TextBox txtEndYeWei
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 228
Left = 2360
Locked = -1 'True
TabIndex = 21
TabStop = 0 'False
Text = " "
Top = 4708
Width = 708
End
Begin VB.TextBox txtBeginYeWei
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 228
Left = 2360
Locked = -1 'True
TabIndex = 16
TabStop = 0 'False
Text = " "
Top = 4434
Width = 708
End
Begin VB.TextBox txtyjaTouLiaoLiang
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 228
Left = 2360
Locked = -1 'True
TabIndex = 15
TabStop = 0 'False
Text = " "
Top = 4160
Width = 708
End
Begin VB.TextBox txtBeginTime
Alignment = 1 'Right Justify
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 228
Left = 2360
Locked = -1 'True
TabIndex = 14
TabStop = 0 'False
Text = " "
Top = 4982
Width = 828
End
Begin VB.PictureBox picTuLi
Appearance = 0 'Flat
AutoSize = -1 'True
BackColor = &H80000005&
BorderStyle = 0 'None
ForeColor = &H80000008&
Height = 1740
Left = 20
Picture = "gylc1frm.frx":C12F8
ScaleHeight = 1740
ScaleWidth = 1065
TabIndex = 5
TabStop = 0 'False
Top = 3860
Width = 1065
End
Begin VB.PictureBox picYeWei
BackColor = &H80000000&
Height = 1572
Left = 840
ScaleHeight = 1515
ScaleWidth = 195
TabIndex = 4
Top = 360
Width = 252
End
Begin VB.Timer tmrJiaoBan
Enabled = 0 'False
Left = 5280
Top = 3600
End
Begin VB.PictureBox picJiaoBan
AutoSize = -1 'True
BorderStyle = 0 'None
Height = 1740
Left = 6550
Picture = "gylc1frm.frx":C751A
ScaleHeight = 1740
ScaleWidth = 1710
TabIndex = 2
TabStop = 0 'False
Top = 3640
Width = 1710
End
Begin VB.Label Label17
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "精酯量"
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 156
Left = 1160
TabIndex = 31
Top = 3936
Width = 468
End
Begin VB.Label Label16
AutoSize = -1 'True
Caption = "Kg"
Height = 180
Left = 3080
TabIndex = 30
Top = 3924
Width = 192
End
Begin VB.Label Label15
AutoSize = -1 'True
Caption = "kg"
Height = 180
Left = 3080
TabIndex = 28
Top = 4476
Width = 192
End
Begin VB.Label Label14
AutoSize = -1 'True
Caption = "kg"
Height = 180
Left = 3080
TabIndex = 27
Top = 4740
Width = 192
End
Begin VB.Label Label13
AutoSize = -1 'True
Caption = "Kg"
Height = 180
Left = 3080
TabIndex = 26
Top = 4180
Width = 192
End
Begin VB.Label Label11
AutoSize = -1 'True
BackStyle = 0 'Transparent
Caption = "计量罐终止液位"
BeginProperty Font
Name = "宋体"
Size = 7.5
Charset = 134
Weight = 400
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H80000008&
Height = 156
Left = 1160
TabIndex = 23
Top = 4744
Width = 1092
End
Begin VB.Shape Shape1
BackColor = &H00FFC0FF&
BorderColor = &H00000080&
FillColor = &H80000001&
Height = 1680
Left = 200
Top = 3864
Width = 3132
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -