栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验 > 笔试题库

[填空题] 以下是一个计算矩形面积的程序,调用过程计算矩形面积,请将程序补充完整。  Sub RecArea(L,W)   Dim S As Double   S=L*W   MsgBox"

笔试题库 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

[填空题] 以下是一个计算矩形面积的程序,调用过程计算矩形面积,请将程序补充完整。  Sub RecArea(L,W)   Dim S As Double   S=L*W   MsgBox"

[填空题] 以下是一个计算矩形面积的程序,调用过程计算矩形面积,请将程序补充完整。

  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)。

转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/594467.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号