首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Command1_Click() Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2# For i=1 To 4 a(i) =i Ne
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Command1_Click() Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2# For i=1 To 4 a(i) =i Ne
admin
2013-01-23
41
问题
下面程序运行后,单击命令按钮,输出的结果是【 】
Private Sub Command1_Click()
Dim a%(1 To 4) , b%(2 To 6) , i%, str1#, str2#
For i=1 To 4
a(i) =i
Next
For i=2 To 6
b(i) =i
Next
str1=YAG(a)
str2=YAG(b)
Print "str1="; str1; "str2="; str2
End Sub
Function YAG(a() As Integer)
Dim t#, i%
t=1
For i=LBound(a) To UBound(a)
t=t * a(i)
Next
YAG=t
End Function
选项
答案
str1=24 str2=720
解析
考查考生对定义数组和调用函数的掌握情况。程序首先调用循环语句为数组a、b赋值,其中a(i) = i;b(i) = i,且数组a的上下界分别为1和4,数组b的上下界分别为2和6;接着将数组a作为参数调用YAG过程,在YAG过程中,定义了两个变量t及i,i作为循环语句For的变量,它的初始值和终值分别为数组的上下界,循环体为t = t * a(i),即将a(i)的值乘以t,然后再赋给t,当循环结束后,程序返回的就是数组a中的各元素的积;同理,程序将数组b作为参数传递给YAG过程后返回数组b中各元素的积,运行程序结束后,输出结果为:strX=24 str2=720。
转载请注明原文地址:https://kaotiyun.com/show/i5hp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
关于结构化程序设计原则和方法的描述错误的是
有如下程序PrivateSubCommand1_Click()a=100Dos=s+a
变量未赋值时,数值型变量的值为0,字符串变量的值为
阅读如下程序:PrivateSubForm_Click()DimnumAsInteger,digitAsIntegernum=InputBox("输入数据")DoWhilenum<>0
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应将该列表框的MultiSelect属性设置为
下列程序实现的功能是:当在窗体上单击时,把C盘根目录下的文件a1.txt复制到D盘,并取名为a2,txt。PrivateSubForm_Click()DimChAsStringOpen"c:\a1.txt"
VisualBasic中窗体文件的扩展名是()。
数据库系统的核心部分是______。
为了在运行时将“d:\pic”文件夹下的图形文件“a.jpg”装入图片框Picture1,所使用的语句为【】。
设A="123456",则表达式Val(Left(A,4)+Mid(A,4,2))的值为
随机试题
过渡时期总路线的两翼是()
关于K-B纸片扩散法操作的描述,下列说法错误的是A.各纸片中心距离不小于24mmB.纸片距平板内缘不应大于15mmC.直径90mm的平皿可贴6张纸片D.纸片贴牢后避免移动E.35℃培养16~18h后阅读结果
患者,男性,46岁。主因双下肢无力、行走困难而入院,四肢有明显的手套、袜套样感觉,可诊断为
患儿,8岁,因眼睑水肿、尿少4天入院。精神差,眼睑及面部水肿、指压凹陷不明显。血压125/80mmHg,每小时尿量
合同约定应当先履行债务的当事人,当对方( ),可以中止履行合同。
DWDM系统主要网络单元中,()是无源器件。
待摊费用账户如有余额,其余额一般在借方。()
我国80%的卫生资源集中在城市,城市卫生资源的80%又集中在大医院,呈“倒三角”,而卫生服务的需求大部分在基层,呈“正三角”,导致大医院资源闲置,小医院资源不足。以患者为中心,根据其不同要求提供相应服务并追求顾客满意度,已成为当下市场运作下供方的生存之基。
关于“死锁”,下列说法中正确的是
A、Notatall.B、Itdependsonwhatitis.C、Yes,Ican.D、No,itwasnothing.B
最新回复
(
0
)