首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Private Sub Command1_Click() Dim a%(10) For k = 1 To 9 a(k) = InputBox("") Next k Call proc(a()
有下面程序代码: Private Sub Command1_Click() Dim a%(10) For k = 1 To 9 a(k) = InputBox("") Next k Call proc(a()
admin
2020-07-22
24
问题
有下面程序代码:
Private Sub Command1_Click()
Dim a%(10)
For k = 1 To 9
a(k) = InputBox("")
Next k
Call proc(a(), 6, 3, 10)
For k = 1 To 10
Print a(k); " ";
Next k
End Sub
Private Sub proc(a%(), x%, m%, n%)
For k = n To m + 1 Step -1
a(k) = a(k - 1)
Next k
a(k) = x
End Sub
Command1_Click过程运行时,从键盘输入9个数:12 32 65 34 87 56 79 50 52,则输出是
选项
A、12 32 65 34 87 56 79 50 52
B、6 12 32 65 34 87 56 79 50 52
C、12 32 65 34 87 56 79 50 52 6
D、12 32 6 65 34 87 56 79 50 52
答案
D
解析
数组作为过程的参数时,进行的是按地址传递,即将实参数组的起始地址传递给形参。本题首先用数组a(k)接收键盘中输入的数,进行初始化;proc()过程实现从a(10)开始依次将后一位值赋值给其前一位,直到a(4)。当k=3时,结束循环,并将x的值赋值给a(3)。故正确答案为选项D。
转载请注明原文地址:https://kaotiyun.com/show/GkHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多砬整数")Fork=1ToLen(x)b=Mid(x,
有三个关系R、S和T如下:则由关系R和s得到关系T的操作是()。
从键盘上输入一个浮点数asingle,利用字符串函数对该数进行处理后,如果输出的内容不是“非浮点数”,则对程序输出的内容分析正确的是()。asingle=Input,Box(“请输入一个浮点数:”)strl$=Str$(asin
下列叙述中正确的是
当窗体最小化时缩小为一个图标,设置这个图标的属性是()。
下列选项中,不属于数据模型所描述的内容的是()。
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是()。
三角形的构成条件是:任意2边之和大于第3边。设变量a、b、c是3条直线的长度,要求判断这3条直线能否构成一个三角形。下面有3个程序段可以正确判断,另一个不能正确判断的是
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
随机试题
毛细血管内增生性肾小球肾炎时,电镜下病变特点是
女性,40岁,右上腹阵发性绞痛伴恶心、呕吐3小时来院急诊。体温37℃,右上腹轻压痛,Murphy征(一)。既往检查胆囊内有小结石。对该患者首先考虑胆囊结石合并
张三打算开一家小吃店,于是向该市工商行政管理局申请办理营业执照,但是多次申请办理工商行政管理局均不予受理,理由是张三不适合做生意。于是张三向该市人民法院提起诉讼,根据以上事实,下列说法错误的是()。
梁(板)安装的实测项目通常不包括()。
广义的职业道德是指从业人员在职业活动中应遵循的行为准则。()
DNS
数据库三级模式结构,也称( )分级结构,从内到外分3个层次描述,分别称为( )、( )和( )。
B-ISDN中的ISDN的意思是综合业务数字网(IntegratedServiceDigitalNetwork),而B的意思是【 】。
如表1所示,在某dhcp客户机上捕获了4条报文,并对第四条报文进行了解析,表2是在该客户机捕获上述报文后执行ipconfig/all命令后得到的部分信息。分析表中的报文和信息,并补全表中空白处的信息。
Writeanoteofabout50-60wordsbasedonthefollowingsituation:Paul,yourEnglishteacherfromAustralia,hasaskedy
最新回复
(
0
)