综合知识

PrivateSubCommand1_Click()DimKAsSingleDimTOTALAsSingleDimfee1AsSingleDimfee2AsSingleDimfee6AsSingleDimfee5AsSingleDimK2A...

PrivateSubCommand1_Click()OnErrorResumeNextIfText1.Text<0.05OrText1=0.05ThenPSO2=Text1.Text/0.05*50ElseIfText1.Text&g...

PrivateSubCombo1_Click()IfCombo1.Text="拱顶罐"Then'大呼吸量计算参数设置Label1.Visible=Tru......