首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行后,单击命令按钮,输出的结果是______。 Private Sub Command1_Click() Dim a%(1 To 5),i%,s# For i=1 To 5 a(i)=i Next
下面程序运行后,单击命令按钮,输出的结果是______。 Private Sub Command1_Click() Dim a%(1 To 5),i%,s# For i=1 To 5 a(i)=i Next
admin
2012-03-22
49
问题
下面程序运行后,单击命令按钮,输出的结果是______。
Private Sub Command1_Click()
Dim a%(1 To 5),i%,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
选项
答案
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。
转载请注明原文地址:https://kaotiyun.com/show/bGhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
查找随机文件的记录时,应使用的方法是
阅读程序:OptionBase1PrivateSubForm_Click()Dima(3)AsIntegerPrint“输入的数据是:”;Fori=1To3a(i)=InputBox(“输人数据”)Printa(i);
在窗体上画一个名称为“Command1”,标题为“计算”的命令按钮,再画7个标签,其中5个标签组成名称为Label1的控件数组;名称为Label2的标签用于显示计算结果,其Caption属性的初始值为空;标签Label3的标题为“计算结果”。运行程序时会自
假定一个工程由一个窗体文件Form1和两个标准模块文件Model1及Model2组成。Model1代码如下:PublicxAsIntegerPublicyAsIntegerSubS1()
表达式5Mod3+3\5*2的值是
以下叙述中错误的是_________。
以下事件过程可以将打开的对话框的标题改为“新时代”的是
下面程序的作用是用InputBox函数输入一个整数,然后判断能否同时被2,5和7整除,果能则输出该数及平方值。请填空。 PrivateSubCommand1_Click() DimnumXAsInteger numX=Val
设在菜单编辑器中定义了—个菜单项,名为menul。为了在运行时隐藏该菜单项,应该使用的语句是
相对于数据库系统,文件系统的主要缺陷有数据关联差、数据不一致性和
随机试题
肾上腺增大的原因有
关于短效β受体激动剂的描述,错误的是
患者,男性,16岁,跑步后感到右胸胀痛,胸闷憋气。查体:呼吸急促,呼吸28次/min,右上肺叩诊鼓音,呼吸音消失,心率105次/min,律齐。最佳紧急处理方法为
甲厂发运一批玻璃器皿,以仅印有“芳菲牌化妆品”字样的纸箱包装,在运输过程中,由于装卸工未轻拿轻放而损坏若干件器皿,由()承担该损失。
[2006年第50题]建筑物内的生活给水系统,当卫生起居配水点处的静压水压力超过规定值时,应采取下述哪项措施?
向不同会计资料使用者提供财务会计报告,其编制依据应当一致。()
国际多式联运必须有一个国际多式联运经营人。()
2013年1月1日,经股东大会批准,甲上市公司(以下简称“甲公司”)与100名高级管理人员签署股份支付协议。协议规定:①甲公司向100名高级管理人员每人授予10万份股票期权,行权条件为这些高级管理人员从授予股票期权之日起连续服务满3年,公司3年平均净利润增
下列通讯社和所属国家对应不正确的是()。
Inhis1976studyofslaveryintheUnitedStates,HerbertGutman,likeFogel,Engerman,andGenovese,hasrightlystressedthe
最新回复
(
0
)