2. 计算机
  3. 有过程如下：Sub fact (m As Integer, total As Long) Dim i As Integer total = 1 for i = 1 To m total = total*i Next i

有过程如下：Sub fact (m As Integer, total As Long) Dim i As Integer total = 1 for i = 1 To m total = total*i Next i

admin2010-09-11  51
问题 有过程如下：Sub fact (m As Integer, total As Long)    Dim i As Integer    total = 1    for i = 1 To m        total = total*i    Next iEnd Sub调用它的事件过程如下：Private Sub Command1_ Click ()    Dim tot As Long    Dim a As Integer    a = Val InputBox (“请输入数据”))    Call fact (a, tot)    Print totEnd Sub则输入数据5，运行结果为 ______。
选项 A、100
B、120
C、200
D、50
答案B
解析 本题难点是实、虚参数传递的问题。tot按ByRef参数传递。子过程的功能是计算 n!，“5!=120”。
转载请注明原文地址:https://jikaoti.com/ti/5ng0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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