首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面程序运行后,单击命令按钮,输出的结果是 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
下面程序运行后,单击命令按钮,输出的结果是 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
admin
2013-01-23
539
问题
下面程序运行后,单击命令按钮,输出的结果是
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
选项
A、str1=24 str2=720
B、str1=12 str2=360
C、str1=24 str2=180
D、str1=36 str2=720
答案
A
解析
考查数组作为过程参数的使用方法。程序首先调用循环语句为数组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。
转载请注明原文地址:https://kaotiyun.com/show/dMhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
按照逻辑结构分类,数据结构可分为线性结构和非线性结构,队列属于【】。
以下是文本框的KeyDown和KeyPress事件的框架,关于它们说法正确的是()。PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)EndSubP
窗体上有两个单选按钮和两个复选框,它们的名称和它们的Caption属性相同。要使这些控件显示成如图20-7所示的状态,可在Form_Load事件中执行()。
编写了如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAslnteger)If(ButtonAnd3)=3ThenPrint“A
确定一个窗体或控件大小的属性是
算法计算量的大小称为算法的
定义有5个整数型元素的数组,正确的语句是______。
可以在窗体模块的通用声明段中声明______。
按“先进后出”原则组织数据的数据结构是【】。
高度为h(h>O)的二叉树最少有【】个结点。
随机试题
A.肾上腺素B.去甲肾上腺素C.乙酰胆碱D.γ-氨基丁酸支配骨骼肌的躯体运动神经纤维释放的递质是
患者,男性,20岁。因急性阑尾炎急诊行阑尾切除术,术后病理为坏疽性阑尾炎。术后第2天早晨,患者自述腹痛不能忍受,面色苍白,四肢湿冷,未解小便,监护仪示:心率120次/分,血压75/60mmHg,查体:腹硬,腹稍胀,全腹压痛,无明显反跳痛,伴轻度肌紧张。听诊
后者可提高前者血药浓度并降低外周性心血管系统不良反应的合用为
A.信息产业主管部门B.电信管理机构C.卫生行政部门D.药品监督管理部门《互联网药品信息服务资格证书》的发证部门是
患儿10个月,以发热、咳嗽、气促就诊。体检:T39.5℃,P150次/min,R50次/min,口周发绀,两肺有细湿罗音,诊断为肺炎。应对该患儿立即采取的护理措施是
根据《物业管理条例》,召开业主大会临时会议须经()以上的业主提议。
“打溜子”是流行于________省土家族的一种民间器乐合奏,通常用马锣、大锣、头钹、二钹四件乐器演奏。
金融深化论的主要内容是什么?人们对其的争论和反思对我们有哪些启示?
ASSUAGE:
Gotapenhandy?Tobestestimateyourstart-upcosts,you’llneedtomakealistandthemoredetailedthebetter.Asmartway
最新回复
(
0
)