📄 frmhybridgas.frm
字号:
VERSION 5.00
Begin VB.Form frmHybridGas
AutoRedraw = -1 'True
Caption = "混合气体"
ClientHeight = 8895
ClientLeft = 5445
ClientTop = 2130
ClientWidth = 5880
LinkTopic = "Form1"
MDIChild = -1 'True
ScaleHeight = 8895
ScaleWidth = 5880
Begin VB.Frame Frame2
Caption = "混合气体进口基本参数"
Height = 1365
Left = 120
TabIndex = 49
Top = 7440
Width = 5610
Begin VB.TextBox Text6
Height = 375
Index = 5
Left = 360
TabIndex = 73
Top = 840
Width = 735
End
Begin VB.TextBox Text6
Height = 375
Index = 4
Left = 3600
TabIndex = 72
Top = 840
Width = 1215
End
Begin VB.TextBox Text6
Height = 375
Index = 0
Left = 360
TabIndex = 53
Top = 360
Width = 735
End
Begin VB.TextBox Text6
Height = 375
Index = 1
Left = 1680
TabIndex = 52
Top = 360
Width = 855
End
Begin VB.TextBox Text6
Height = 375
Index = 2
Left = 3600
TabIndex = 51
Top = 360
Width = 1215
End
Begin VB.TextBox Text6
Height = 375
Index = 3
Left = 1680
TabIndex = 50
Top = 840
Width = 855
End
Begin VB.Label Label12
Caption = "k："
Height = 255
Left = 120
TabIndex = 63
Top = 480
Width = 855
End
Begin VB.Label Label13
Caption = "Cp："
Height = 255
Left = 1320
TabIndex = 62
Top = 480
Width = 495
End
Begin VB.Label Label14
Caption = "R："
Height = 240
Left = 3240
TabIndex = 61
Top = 480
Width = 255
End
Begin VB.Label Label15
Caption = "ρ："
Height = 255
Left = 1320
TabIndex = 60
Top = 1080
Width = 375
End
Begin VB.Label Label16
Caption = "μ："
Height = 240
Left = 3240
TabIndex = 59
Top = 960
Width = 360
End
Begin VB.Label Label7
Caption = "M:"
Height = 255
Left = 120
TabIndex = 58
Top = 960
Width = 255
End
Begin VB.Label Label8
Caption = "(J/Kg.K)"
Height = 255
Index = 0
Left = 2520
TabIndex = 57
Top = 480
Width = 720
End
Begin VB.Label Label9
Caption = "(J/Kg.K)"
Height = 240
Left = 4800
TabIndex = 56
Top = 480
Width = 720
End
Begin VB.Label Label10
Caption = "Kg/m3"
Height = 255
Left = 2640
TabIndex = 55
Top = 960
Width = 615
End
Begin VB.Label Label11
Caption = "Pa.s"
Height = 255
Left = 5040
TabIndex = 54
Top = 960
Width = 495
End
End
Begin VB.CommandButton Command1
Caption = "计算"
Height = 315
Left = 1200
TabIndex = 48
Top = 6960
Width = 700
End
Begin VB.CommandButton Command6
Caption = "输出"
Height = 315
Left = 3000
TabIndex = 47
Top = 6960
Width = 700
End
Begin VB.Frame Frame1
Caption = "请输入所用混合气各组分比例(共100%)"
Height = 2775
Left = 120
TabIndex = 21
Top = 4080
Width = 5655
Begin VB.TextBox Text1
Height = 270
Index = 0
Left = 120
TabIndex = 42
Top = 600
Width = 1095
End
Begin VB.TextBox Text2
Height = 270
Index = 0
Left = 1320
TabIndex = 41
Top = 600
Width = 855
End
Begin VB.TextBox Text3
Height = 270
Index = 0
Left = 2280
TabIndex = 40
Top = 600
Width = 855
End
Begin VB.ListBox List1
Height = 1320
ItemData = "frmHybridGas.frx":0000
Left = 3360
List = "frmHybridGas.frx":0002
TabIndex = 39
Top = 600
Width = 1935
End
Begin VB.TextBox Text1
Height = 270
Index = 2
Left = 120
TabIndex = 38
Top = 1320
Width = 1095
End
Begin VB.TextBox Text1
Height = 270
Index = 3
Left = 120
TabIndex = 37
Top = 1680
Width = 1095
End
Begin VB.TextBox Text1
Height = 270
Index = 4
Left = 120
TabIndex = 36
Top = 2040
Width = 1095
End
Begin VB.TextBox Text1
Height = 270
Index = 5
Left = 120
TabIndex = 35
Top = 2400
Width = 1095
End
Begin VB.TextBox Text2
Height = 270
Index = 2
Left = 1320
TabIndex = 34
Top = 1320
Width = 855
End
Begin VB.TextBox Text2
Height = 270
Index = 1
Left = 1320
TabIndex = 33
Top = 960
Width = 855
End
Begin VB.TextBox Text2
Height = 270
Index = 3
Left = 1320
TabIndex = 32
Top = 1680
Width = 855
End
Begin VB.TextBox Text2
Height = 270
Index = 4
Left = 1320
TabIndex = 31
Top = 2040
Width = 855
End
Begin VB.TextBox Text3
Height = 270
Index = 2
Left = 2280
TabIndex = 30
Top = 1320
Width = 855
End
Begin VB.TextBox Text3
Height = 270
Index = 3
Left = 2280
TabIndex = 29
Top = 1680
Width = 855
End
Begin VB.TextBox Text3
Height = 270
Index = 4
Left = 2280
TabIndex = 28
Top = 2040
Width = 855
End
Begin VB.TextBox Text3
Height = 270
Index = 5
Left = 2280
TabIndex = 27
Top = 2400
Width = 855
End
Begin VB.TextBox Text1
Height = 270
Index = 1
Left = 120
TabIndex = 26
Top = 960
Width = 1095
End
Begin VB.TextBox Text2
Height = 270
Index = 5
Left = 1320
TabIndex = 25
Top = 2400
Width = 855
End
Begin VB.TextBox Text3
Height = 270
Index = 1
Left = 2280
TabIndex = 24
Top = 960
Width = 855
End
Begin VB.CommandButton Command3
Caption = "清空"
Height = 315
Left = 4440
TabIndex = 23
ToolTipText = "取消输入或进行新计算"
Top = 2160
Width = 700
End
Begin VB.CommandButton Command7
Caption = "确定"
Height = 315
Left = 3480
TabIndex = 22
Top = 2160
Width = 700
End
Begin VB.Label Label3
Caption = "气体名称"
Height = 255
Left = 240
TabIndex = 46
Top = 240
Width = 735
End
Begin VB.Label Label4
Caption = "体积百分比"
Height = 255
Left = 1320
TabIndex = 45
Top = 240
Width = 975
End
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -