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