2. 计算机
  3. 以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。 　　Sub RecArea(L，W) 　　　Dim S As Double 　　　S=L*W 　　　MsgBox"Total Area is"& Str(S) 　　End Sub 　　

以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。 　　Sub RecArea(L，W) 　　　Dim S As Double 　　　S=L*W 　　　MsgBox"Total Area is"& Str(S) 　　End Sub 　　

admin2009-01-15  36
问题 以下是一个计算矩形面积的程序，调用过程计算矩形面积，请将程序补充完整。
　　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(M，N)
解析 程序通过RecArea来计算并输出矩形的面积，它有两个形式参数，分别为矩形的长和宽；在Sub事件过程中，从键盘上输入矩形的长 和宽，调用InputBox函数分别将输入的数赋给M和B，所以【  】为N=InputBox("What is the W?")；将M和N作为实参调用RecArea过程，它有两 种书写方式，一种是把过程的名字放在一个Call语句中，格式为Call过程名[(实际参数)]；另外一种是把过程名作为一个语句来使用，与第一 种方式相比，它去掉关键字Call，去掉了参数列表，所以【  】为Call RecArea(M，N)或RecArea (M，N)。
转载请注明原文地址:https://kaotiyun.com/show/LM2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)