A-A+
以下是一个计算矩形面积的程序 调用过程计算矩形面积 请将程序补充完整。 Sub RecAre
问题详情
以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。 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?") Call RecArea(MN)
程序通过RecArea来计算并输出矩形的面积，它有两个形式参数，分别为矩形的长和宽；在Sub事件过程中，从键盘上输入矩形的长和宽，调用InputBox函数分别将输入的数赋给M和B，所以【】为N=InputBox("WhatistheW?")；将M和N作为实参调用RecArea过程，它有两种书写方式，一种是把过程的名字放在一个Call语句中，格式为Call过程名[(实际参数)]；另外一种是把过程名作为一个语句来使用，与第一种方式相比，它去掉关键字Call，去掉了参数列表，所以【】为CallRecArea(M，N)或RecArea(M，N)。
