首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设有如下程序 Option Base 1 Private Sub Command1_Click( ) Dim a(10)As Integer Dim n As
设有如下程序 Option Base 1 Private Sub Command1_Click( ) Dim a(10)As Integer Dim n As
admin
2013-04-11
31
问题
设有如下程序
Option Base 1
Private Sub Command1_Click( )
Dim a(10)As Integer
Dim n As Integer
n=lnput Box(“输入数据”)
If n<10 Then
Call GetArray(a,n)
End If
End Sub
Private Sub GetArray(b( )As Integer,n As Integer)
Dim c(10)AsInteger
j=0
For i=1 To n
b(i)=CInt(Rnd( )*100)
If b(i)/2=b(i)\2 Then
j=j+1
c(j)=b(i)
End lf
Next
Print j
End Sub
以下叙述中错误的是
选项
A、数组b中的偶数被保存在数组c中
B、程序运行结束时,在窗体上显示的是c数组中元素的个数
C、GetArray过程的参数n是按值传送的
D、如果输入的数据大于10,则窗体上不显示任何信息
答案
4
解析
GetAlTay过程返回c数组中元素的个数。c数组元素由b(i)赋值,但只有b(i)中为偶数的元素才能赋值给c数组中的元素。单击按钮时,如果输入的n值小于10,则调用GetArray过程。据此A、B、D项都是正确的。C项的错误比较明显,GetArvay过程的参数n前没有关键字“ByVal”,则默认为“ByReF”,即n是按传地址的方式传送参数的。
转载请注明原文地址:https://jikaoti.com/ti/KRO0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)If(ButtonAnd3)=3ThenPrint"AAAA"
软件开发的结构化生命周期方法将软件生命周期划分成。
以下关系表达式中,其值为假的是
下列不属于软件工程的3个要素的是
设A="12345678",则表达式Val(Len(A,4)+Mid(A,4,2))的值为______。
决定控件上文字的字体、字形、大小、效果的属性是______。
表达式Right("Beijing",4)的值是
如果在窗体Form1上添加一个通用对话框控件CommonDalogl,那么语句CommonDialog1.Action=4的作用是______。
文本框控件最多能处理______个字节。
软件设计模块化的目的是【】。
随机试题
煅石膏的功效是
眼内直肌收缩使眼球内转,其协同肌是
治疗疾病的基本原则是
甲地的A公司向乙地的B公司开具了一张10万元的汇票以支付货款,该汇票上载明的付款地为丙地。后B公司将汇票背书给丁地的C公司,C公司在规定的期限内向丙地银行提示承兑,银行以汇票存在瑕疵为由而拒绝承兑。C公司遂以B公司为被告向人民法院起诉。本案可以由以下何地人
记账凭证正确,因登记时的笔误而引起的账簿记录错误,更正的惟一方法是红字更正法。()
下列关于物的说法中,错误的是()。
银行业协会所确定的利率有()。
根据《国内航空运输承运人赔偿责任限额规定》,对每名旅客随身携带物品的赔偿责任限额为()。
有广告商借鉴了认知心理学的研究结果,采用插播瞬时片段广告的方式进行广告宣传,通常观众在看电视或电影时是觉察不到瞬时广告的,但是却可以起到一定的广告效应。这是利用了认知心理学中()的原理。
从5本不同的书中任意取出两本,结果有(60)种。
最新回复
(
0
)