Question

vb 6.0 编译错误 必选参数

Private Sub CaculateAirVol(ByVal theAirPressure As Single, ByVal theAirTemp As Single, ByRef theAirVolume As Double)
Dim thermaltemp As Single

thermaltemp = theAirTemp + 273.5
theAirVolume = 287.1 * thermatemp / theAirPressure
End Sub

Private Sub Command1_Click()
theAirTemp = Val(Text1.Text)
theAirPressure = Val(Text2.Text)

Call CaculateAirVol(theAirTemp, theAirPressure)

Text3.Text = theAirVolume
End Sub
问题补充：Call CaculateAirVol(theAirTemp, theAirPressure)
在本句提示 错误 必选参数，，高手指点一下。。谢了。。。

Answer 1

自定义过程CaculateAirVol 有3个参数 你调用时 只填2个当然出错