📄 form1.frm
字号:
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 300
Left = 1140
TabIndex = 72
Top = 240
Width = 855
End
Begin VB.Label Label15
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "下游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 71
Top = 1425
Width = 1320
End
Begin VB.Label Label16
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "上游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 70
Top = 885
Width = 1320
End
Begin VB.Label Label28
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "桃花闸"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 360
TabIndex = 69
Top = 1080
Width = 1320
End
Begin VB.Label Label29
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "下游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 68
Top = 2505
Width = 1320
End
Begin VB.Label Label30
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "上游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 67
Top = 1965
Width = 1320
End
Begin VB.Label Label31
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "朝阳闸"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 360
TabIndex = 66
Top = 2160
Width = 1320
End
Begin VB.Label Label32
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "下游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 65
Top = 3585
Width = 1320
End
Begin VB.Label Label33
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "上游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 64
Top = 3060
Width = 1320
End
Begin VB.Label Label34
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "昌南船闸"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 360
TabIndex = 63
Top = 3240
Width = 1320
End
Begin VB.Label Label35
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "广场"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 360
TabIndex = 62
Top = 4320
Width = 1320
End
Begin VB.Label Label38
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "上游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 61
Top = 4125
Width = 1320
End
Begin VB.Label Label39
Alignment = 2 'Center
BackColor = &H00FFFF00&
Caption = "下游水位"
BeginProperty Font
Name = "宋体"
Size = 15
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 375
Left = 1920
TabIndex = 60
Top = 4665
Width = 1320
End
End
Begin VB.Frame Frame1
BackColor = &H00FF8080&
Height = 5655
Left = 240
TabIndex = 40
Top = 960
Width = 6255
Begin VB.CommandButton Command
Caption = "手动置数"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Index = 7
Left = 4680
TabIndex = 9
Top = 4092
Width = 1215
End
Begin VB.TextBox Text
Alignment = 2 'Center
DataField = " "
DataSource = " "
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 405
Index = 7
Left = 3480
MaxLength = 5
TabIndex = 27
Top = 4110
Width = 975
End
Begin VB.TextBox Text
Alignment = 2 'Center
DataField = " "
DataSource = " "
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 405
Index = 8
Left = 3480
MaxLength = 5
TabIndex = 28
Top = 4650
Width = 975
End
Begin VB.CommandButton Command
Caption = "手动置数"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Index = 8
Left = 4680
TabIndex = 10
Top = 4635
Width = 1215
End
Begin VB.TextBox Text
Alignment = 2 'Center
DataField = " "
DataSource = " "
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 405
Index = 5
Left = 3480
MaxLength = 5
TabIndex = 25
Top = 3030
Width = 975
End
Begin VB.CommandButton Command
Caption = "手动置数"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Index = 5
Left = 4680
TabIndex = 7
Top = 3008
Width = 1215
End
Begin VB.CommandButton Command
Caption = "手动置数"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
Index = 4
Left = 4680
TabIndex = 6
Top = 2466
Width = 1215
End
Begin VB.TextBox Text
Alignment = 2 'Center
DataField = " "
DataSource = " "
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 405
Index = 4
Left = 3480
MaxLength = 5
TabIndex = 24
Top = 2490
Width = 975
End
Begin VB.TextBox Text
Alignment = 2 'Center
DataField = " "
DataSource = " "
Enabled = 0 'False
BeginProperty Font
Name = "宋体"
Size = 14.25
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
ForeColor = &H00000000&
Height = 405
Index = 3
Left = 3480
MaxLength = 5
TabIndex = 23
Top = 1950
Width = 975
End
Begin VB.CommandButton Command
Caption = "手动置数"
BeginProperty Font
Name = "宋体"
Size = 12
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 450
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -