📄 frmlossratedetail.frm
字号:
VERSION 5.00
Begin VB.Form frmLossRateDetail
Caption = "设置作物评估参数"
ClientHeight = 4065
ClientLeft = 60
ClientTop = 345
ClientWidth = 7365
ForeColor = &H00FFFFFF&
Icon = "frmLossRateDetail.frx":0000
LinkTopic = "Form1"
ScaleHeight = 4065
ScaleWidth = 7365
StartUpPosition = 3 'Windows Default
Begin VB.CommandButton cmdContinue
Caption = "继续"
Height = 375
Left = 1320
TabIndex = 133
Top = 3240
Width = 735
End
Begin VB.Frame frameLoss6
Caption = "6 级水深，7 级洪损率"
Height = 3855
Left = 3600
TabIndex = 100
Top = 120
Visible = 0 'False
Width = 3615
Begin VB.TextBox LossRate67
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 129
Text = "0.90"
Top = 3360
Width = 615
End
Begin VB.TextBox DepthBreak66
Alignment = 1 'Right Justify
Height = 285
Left = 720
TabIndex = 128
Text = "1.80"
Top = 3120
Width = 615
End
Begin VB.TextBox LossRate65
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 111
Text = "0.50"
Top = 2400
Width = 615
End
Begin VB.TextBox DepthBreak64
Alignment = 1 'Right Justify
Height = 285
Left = 720
TabIndex = 110
Text = "1.20"
Top = 2160
Width = 615
End
Begin VB.TextBox LossRate63
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 109
Text = "0.30"
Top = 1440
Width = 615
End
Begin VB.TextBox DepthBreak62
Alignment = 1 'Right Justify
Height = 285
Left = 720
TabIndex = 108
Text = "0.60"
Top = 1200
Width = 615
End
Begin VB.TextBox LossRate62
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 107
Text = "0.20"
Top = 960
Width = 615
End
Begin VB.TextBox DepthBreak61
Alignment = 1 'Right Justify
Height = 285
Left = 720
TabIndex = 106
Text = "0.30"
Top = 720
Width = 615
End
Begin VB.TextBox LossRate61
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 105
Text = "0.10"
Top = 480
Width = 615
End
Begin VB.TextBox LossRate64
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 104
Text = "0.40"
Top = 1920
Width = 615
End
Begin VB.TextBox DepthBreak63
Alignment = 1 'Right Justify
Height = 285
Left = 720
TabIndex = 103
Text = "0.90"
Top = 1680
Width = 615
End
Begin VB.TextBox LossRate66
Alignment = 1 'Right Justify
Height = 285
Left = 2520
TabIndex = 102
Text = "0.70"
Top = 2880
Width = 615
End
Begin VB.TextBox DepthBreak65
Alignment = 1 'Right Justify
Height = 285
Left = 720
TabIndex = 101
Text = "1.60"
Top = 2640
Width = 615
End
Begin VB.Line Line85
BorderColor = &H80000012&
X1 = 1800
X2 = 3360
Y1 = 3240
Y2 = 3240
End
Begin VB.Label Label78
Caption = "洪损率"
Height = 255
Left = 1920
TabIndex = 132
Top = 3360
Width = 615
End
Begin VB.Label Label77
BackColor = &H80000016&
Caption = "米"
ForeColor = &H00000000&
Height = 255
Left = 1440
TabIndex = 131
Top = 3120
Width = 255
End
Begin VB.Line Line84
X1 = 240
X2 = 1800
Y1 = 3480
Y2 = 3480
End
Begin VB.Label Label76
BackColor = &H80000016&
Caption = "水深"
ForeColor = &H80000006&
Height = 255
Left = 360
TabIndex = 130
Top = 3120
Width = 375
End
Begin VB.Line Line83
BorderColor = &H80000012&
X1 = 1800
X2 = 3360
Y1 = 2280
Y2 = 2280
End
Begin VB.Line Line82
BorderColor = &H00FF0000&
BorderWidth = 2
X1 = 240
X2 = 3360
Y1 = 3720
Y2 = 3720
End
Begin VB.Label Label75
Caption = "洪损率"
Height = 255
Left = 1920
TabIndex = 127
Top = 2400
Width = 615
End
Begin VB.Label Label74
BackColor = &H80000016&
Caption = "米"
ForeColor = &H00000000&
Height = 255
Left = 1440
TabIndex = 126
Top = 2160
Width = 255
End
Begin VB.Line Line81
X1 = 240
X2 = 1800
Y1 = 2520
Y2 = 2520
End
Begin VB.Label Label73
BackColor = &H80000016&
Caption = "水深"
ForeColor = &H80000006&
Height = 255
Left = 360
TabIndex = 125
Top = 2160
Width = 375
End
Begin VB.Line Line80
BorderColor = &H80000012&
X1 = 1800
X2 = 3360
Y1 = 1320
Y2 = 1320
End
Begin VB.Label Label72
Caption = "洪损率"
Height = 255
Left = 1920
TabIndex = 124
Top = 1440
Width = 615
End
Begin VB.Label Label71
BackColor = &H80000016&
Caption = "米"
ForeColor = &H00000000&
Height = 255
Left = 1440
TabIndex = 123
Top = 1200
Width = 255
End
Begin VB.Line Line79
X1 = 240
X2 = 1800
Y1 = 1560
Y2 = 1560
End
Begin VB.Label Label70
BackColor = &H80000016&
Caption = "水深"
ForeColor = &H80000006&
Height = 255
Left = 360
TabIndex = 122
Top = 1200
Width = 375
End
Begin VB.Line Line78
BorderColor = &H00FF0000&
BorderWidth = 2
X1 = 240
X2 = 240
Y1 = 360
Y2 = 3720
End
Begin VB.Line Line77
BorderWidth = 2
X1 = 1800
X2 = 1800
Y1 = 360
Y2 = 3720
End
Begin VB.Line Line76
BorderColor = &H00FF0000&
BorderWidth = 2
X1 = 240
X2 = 3360
Y1 = 360
Y2 = 360
End
Begin VB.Line Line75
BorderColor = &H80000012&
X1 = 1800
X2 = 3360
Y1 = 840
Y2 = 840
End
Begin VB.Label Label69
Caption = "洪损率"
Height = 255
Left = 1920
TabIndex = 121
Top = 960
Width = 615
End
Begin VB.Label Label68
BackColor = &H80000016&
Caption = "米"
ForeColor = &H00000000&
Height = 255
Left = 1440
TabIndex = 120
Top = 720
Width = 255
End
Begin VB.Line Line74
BorderColor = &H80000012&
X1 = 240
X2 = 1800
Y1 = 600
Y2 = 600
End
Begin VB.Line Line73
X1 = 240
X2 = 1800
Y1 = 1080
Y2 = 1080
End
Begin VB.Label Label67
Caption = "洪损率"
Height = 255
Left = 1920
TabIndex = 119
Top = 480
Width = 615
End
Begin VB.Label Label66
BackColor = &H80000016&
Caption = "水深"
ForeColor = &H80000006&
Height = 255
Left = 360
TabIndex = 118
Top = 720
Width = 375
End
Begin VB.Line Line72
BorderColor = &H00FF0000&
BorderWidth = 2
X1 = 3360
X2 = 3360
Y1 = 360
Y2 = 3720
End
Begin VB.Line Line71
BorderColor = &H80000012&
X1 = 1800
X2 = 3360
Y1 = 1800
Y2 = 1800
End
Begin VB.Label Label64
Caption = "洪损率"
Height = 255
Left = 1920
TabIndex = 117
Top = 1920
Width = 615
End
Begin VB.Label Label63
BackColor = &H80000016&
Caption = "米"
ForeColor = &H00000000&
Height = 255
Left = 1440
TabIndex = 116
Top = 1680
Width = 255
End
Begin VB.Line Line70
X1 = 240
X2 = 1800
Y1 = 2040
Y2 = 2040
End
Begin VB.Label Label62
BackColor = &H80000016&
Caption = "水深"
ForeColor = &H80000006&
Height = 255
Left = 360
TabIndex = 115
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -