以下是一个计算矩形面积的程序,调用过程计算矩形面积,请将程序补充完整。 Sub RecArea(L,W) Dim S As Double S=L*W MsgBox"Total Area is"& Str(S) End Sub Private Sub Command1_Click() Dim M,N M=InputBox("What is the L") M=Val(M) 【】 N=Val(N) 【】 End Sub
参考答案:N=InputBox("What is the W")
解析:程序通过RecArea来计算并输出矩形的面积,它有两个形式参数,分别为矩形的长和宽;在Sub事件过程中,从键盘上输入矩形的长 和宽,调用InputBox函数分别将输入的数赋给M和B,所以第一个空为N=InputBox("What is the W");将M和N作为实参调用RecArea过程,它有两 种书写方式,一种是把过程的名字放在一个Call语句中,格式为Call过程名[(实际参数)];另外一种是把过程名作为一个语句来使用,与第一 种方式相比,它去掉关键字Call,去掉了参数列表,所以第二个空为Call RecArea(M,N)或RecArea (M,N)。