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

[填空题] 下面程序运行后,单击命令按钮,输出的结果是

笔试题库 更新时间:发布时间: 百科书网 趣学号

[填空题] 下面程序运行后,单击命令按钮,输出的结果是______。

Private Sub Command1_Click()

Dim a%(1 To 5),1%,s#

For i=1 To 5

a(i)=i

Next

s=Fun(A)

Print“s=”;s;

End Sub

Function Fun(a() As Integer)

Dim t#,i%

t=1

For i=LBound(A) To UBound(A)

t=t*a(i)

Next

Fun=t

End Function

正确答案:

s=120

参考解析:

程序首先调用循环语句为数组a、b赋值,其中a(i)=i,b(i)=i,且数组a的上下界分别为1和5,接着将数组a作为参数调用Fun过程,在Fun过程中,定义了两个变量t及i,i作为循环语句For的变量,它的初始值和终值分别为数组的上下界,循环体为t=t*a(i),即将a(i)的值乘以t,然后再赋给t,当循环结束后,程序返回的就是数组a中的各元素的积,故输出结果为:s=120。

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

版权所有 ©2023-2025 051e.com

ICP备案号:京ICP备12030808号