📄 frmw1.frm
字号:
Top = 2160
Width = 1095
End
Begin VB.TextBox txtFields
DataField = "3"
DataSource = "Data1"
Height = 285
Index = 3
Left = 4920
MaxLength = 50
TabIndex = 3
Top = 1680
Width = 1095
End
Begin VB.TextBox txtFields
DataField = "2"
DataSource = "Data1"
Height = 285
Index = 2
Left = 4920
MaxLength = 50
TabIndex = 2
Top = 1320
Width = 1095
End
Begin VB.TextBox txtFields
DataField = "1"
DataSource = "Data1"
Height = 285
Index = 1
Left = 4920
MaxLength = 50
TabIndex = 1
Top = 960
Width = 1095
End
Begin VB.TextBox txtFields
DataField = "0"
DataSource = "Data1"
BeginProperty Font
Name = "宋体"
Size = 15.75
Charset = 134
Weight = 700
Underline = 0 'False
Italic = 0 'False
Strikethrough = 0 'False
EndProperty
Height = 405
Index = 0
Left = 10440
MaxLength = 50
TabIndex = 0
Top = 240
Width = 615
End
Begin VB.Shape Shape2
Height = 9255
Left = 480
Top = 840
Width = 13455
End
Begin VB.Label Label23
Caption = "Label23"
Height = 255
Left = 8520
TabIndex = 121
Top = 7800
Visible = 0 'False
Width = 735
End
Begin VB.Label Label22
Caption = "纵向步长值(m)"
Height = 255
Left = 840
TabIndex = 120
Top = 8160
Width = 3015
End
Begin VB.Label Label3
Caption = "横向步长值(m)"
Height = 255
Left = 840
TabIndex = 119
Top = 7800
Width = 2895
End
Begin VB.Line Line35
X1 = 10920
X2 = 10680
Y1 = 1080
Y2 = 1200
End
Begin VB.Shape Shape1
Height = 3225
Left = 6720
Top = 5175
Width = 1575
End
Begin VB.Line Line30
X1 = 8400
X2 = 8040
Y1 = 4800
Y2 = 4080
End
Begin VB.Line Line29
X1 = 8280
X2 = 8040
Y1 = 4080
Y2 = 4080
End
Begin VB.Line Line28
X1 = 8040
X2 = 8400
Y1 = 4080
Y2 = 3360
End
Begin VB.Line Line27
X1 = 8400
X2 = 8040
Y1 = 2640
Y2 = 1920
End
Begin VB.Line Line26
X1 = 8280
X2 = 8040
Y1 = 1920
Y2 = 1920
End
Begin VB.Line Line25
X1 = 8040
X2 = 8400
Y1 = 1920
Y2 = 1200
End
Begin VB.Label Label41
Caption = "城市"
Height = 255
Left = 11640
TabIndex = 118
Top = 5640
Width = 735
End
Begin VB.Label Label40
Caption = "乡村"
Height = 255
Left = 11640
TabIndex = 117
Top = 5280
Width = 615
End
Begin VB.Label lblLabels
Caption = "n2:排气筒高度指数"
Height = 255
Index = 4
Left = 8400
TabIndex = 116
Top = 4680
Width = 1695
End
Begin VB.Label lblLabels
Caption = "n1:烟气热释放率指数"
Height = 255
Index = 3
Left = 8400
TabIndex = 115
Top = 3960
Width = 1935
End
Begin VB.Label lblLabels
Caption = "n0:烟气热状况及地表系数"
Height = 255
Index = 2
Left = 8400
TabIndex = 114
Top = 3240
Width = 2175
End
Begin VB.Label Label39
Caption = "1.5m/s>U10>=0.5m/s"
Height = 255
Left = 3240
TabIndex = 113
Top = 7320
Width = 1695
End
Begin VB.Label Label38
Caption = "U10<0.5m/s"
Height = 255
Left = 3240
TabIndex = 112
Top = 7080
Width = 1575
End
Begin VB.Line Line34
X1 = 2880
X2 = 3120
Y1 = 6600
Y2 = 6480
End
Begin VB.Line Line33
X1 = 3120
X2 = 2880
Y1 = 6720
Y2 = 6600
End
Begin VB.Line Line32
X1 = 2880
X2 = 3120
Y1 = 7320
Y2 = 7200
End
Begin VB.Line Line31
X1 = 3120
X2 = 2880
Y1 = 7440
Y2 = 7320
End
Begin VB.Label Label37
Caption = "1.5m/s>U10>=0.5m/s"
Height = 255
Left = 3240
TabIndex = 111
Top = 6600
Width = 1695
End
Begin VB.Label Label36
Caption = "U10<0.5m/s"
Height = 255
Left = 3240
TabIndex = 110
Top = 6360
Width = 1575
End
Begin VB.Line Line24
X1 = 10920
X2 = 10680
Y1 = 4920
Y2 = 4800
End
Begin VB.Line Line23
X1 = 10680
X2 = 10920
Y1 = 4800
Y2 = 4680
End
Begin VB.Label Label35
Caption = "Qh>=21000"
Height = 255
Left = 11040
TabIndex = 109
Top = 4920
Width = 1575
End
Begin VB.Label Label34
Caption = "2100<=Qh<21000"
Height = 255
Left = 11040
TabIndex = 108
Top = 4560
Width = 1455
End
Begin VB.Line Line22
X1 = 10920
X2 = 10680
Y1 = 4200
Y2 = 4080
End
Begin VB.Line Line21
X1 = 10680
X2 = 10920
Y1 = 4080
Y2 = 3960
End
Begin VB.Label Label33
Caption = "Qh>=21000"
Height = 255
Left = 11040
TabIndex = 107
Top = 4200
Width = 1575
End
Begin VB.Label Label32
Caption = "2100<=Qh<21000"
Height = 255
Left = 11040
TabIndex = 106
Top = 3840
Width = 1455
End
Begin VB.Line Line20
X1 = 10920
X2 = 10680
Y1 = 3480
Y2 = 3360
End
Begin VB.Line Line19
X1 = 10680
X2 = 10920
Y1 = 3360
Y2 = 3240
End
Begin VB.Label Label31
Caption = "Qh>=21000"
Height = 255
Left = 11040
TabIndex = 105
Top = 3480
Width = 1575
End
Begin VB.Label Label30
Caption = "2100<=Qh<21000"
Height = 255
Left = 11040
TabIndex = 104
Top = 3120
Width = 1455
End
Begin VB.Line Line18
X1 = 10920
X2 = 10680
Y1 = 2760
Y2 = 2640
End
Begin VB.Line Line17
X1 = 10680
X2 = 10920
Y1 = 2640
Y2 = 2520
End
Begin VB.Label Label29
Caption = "Qh>=21000"
Height = 255
Left = 11040
TabIndex = 103
Top = 2760
Width = 1575
End
Begin VB.Label Label28
Caption = "2100<=Qh<21000"
Height = 255
Left = 11040
TabIndex = 102
Top = 2400
Width = 1455
End
Begin VB.Line Line16
X1 = 10920
X2 = 10680
Y1 = 2040
Y2 = 1920
End
Begin VB.Line Line15
X1 = 10680
X2 = 10920
Y1 = 1920
Y2 = 1800
End
Begin VB.Label Label27
Caption = "Qh>=21000"
Height = 255
Left = 11040
TabIndex = 101
Top = 2040
Width = 1575
End
Begin VB.Label Label26
Caption = "2100<=Qh<21000"
Height = 255
Left = 11040
TabIndex = 100
Top = 1680
Width = 1455
End
Begin VB.Line Line14
X1 = 10920
X2 = 10680
Y1 = 1320
Y2 = 1200
End
Begin VB.Line Line13
X1 = 10200
X2 = 10440
Y1 = 1200
Y2 = 1080
End
Begin VB.Label Label25
Caption = "Qh>=21000"
Height = 255
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -