首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_ Click() Dim a a=Array(1,2,3,4) j=1 For i= 4 To 1 Step-1 s=s+ a(i)*j
在窗体上画一个命令按钮,然后编写如下事件过程: Option Base 1 Private Sub Command1_ Click() Dim a a=Array(1,2,3,4) j=1 For i= 4 To 1 Step-1 s=s+ a(i)*j
admin
2010-09-11
46
问题
在窗体上画一个命令按钮,然后编写如下事件过程:
Option Base 1
Private Sub Command1_ Click()
Dim a
a=Array(1,2,3,4)
j=1
For i= 4 To 1 Step-1
s=s+ a(i)*j
j=j*10
Next i
Print s
End Sub
运行上面的程序,单击命令按钮,其输出结果是【 】。
选项
答案
1234
解析
跟踪程序:
由a=Array(1,2,3,4)可知:
a(1)=1
a(2)=2
a(3)=3
a(4)=4
执行循环体:
s=s+ a(i)*j=a(4)*1=4,j=j*10=10
s=s+ a(i)*j=4+a(3)*10=34,j=j*10=100
s=s+ a(i)*j=34+a(2)*100=234,j=j*10=1000
s=s+ a(i)*j=234+a(1)*1000=1234,j=j*10=10000
最终的输出结果是:1234。
转载请注明原文地址:https://kaotiyun.com/show/6Pmp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Java语言中,负责并发管理的机制是( )。
下列事件监听器中,无法对TextField对象进行事件监听和处理的是()。
下列代码中,将引起一个编译错误的行是1)publicclassTest{2)intm,n;3)publicTest(){}4)publicTest(inta){m=a;}5)
定义一个表示10个值为null的字符串数组,下面选项正确的是
将E-R图转换到关系模式时,实体与联系都可以表示成
数据库概念设计的过程中,视图设计一般有三种设计次序,以下各项中不对的是( )。
数据库技术的根本目标是要解决数据的()。
字符串分为两大类,一类是字符串常量,使用String类的对象表示;另一类是字符串变量,使用【】类的对象表示。
给出下面程序的代码:byte[]array1,array2[];bytearray3[][];byter[][]array4;下列数组操作语句中不正确的是( )。
E/R图可以直接转换为关系,其每个属性都对应于关系中的一个属性;E/R图的联系转换为关系时,其属性由两部分组成:与该联系有关的键码属性(集);______。
随机试题
________是英文UniversalSerialBus(递用串行总线)的缩写,是一个外部总线标准,用于规范计算机与外部设备的连接和通信。
能“上行头目,下调经水,中开郁结”的药物是
患者,女,48岁。突发性恶心、头晕,随之呕吐鲜红色血液约1000ml。查体:BP8/6kPa,P110次/分,面色苍白,神志淡漠,巩膜无黄染,心肺未见异常,腹软,无压痛,肝脾未触及,移动性浊音阴性。下列哪项支持肝硬化食管静脉曲张破裂出血的诊断
不属于人工管理阶段会计核算软件的特点的是()。
盘龙藻井变身雨伞,飞檐角上的瑞兽蹲踞在铅笔上,朝珠成了时尚耳机……北京故宫博物院一改人们印象中的“正襟危坐”,以馆藏文物和古典建筑为元素创作了多款热销产品。这说明()。
王老师上课时,小班的学生轩轩比较好动,时而玩弄自己带过来的机器人,时而扯前面女同学的头发,时而用脚踢前面同学的屁股,王老师发现这一情况,把轩轩叫出来,在全班同学前面进行指责,“你原本就比较笨,还不好好学习,怎么能够赶上别人?”并不让轩轩上这门课,站到门外去
简述教学的任务与过程。
邓小平提出的社会主义两大原则是( )
打开考生文件夹下的演示文稿yswg.ppt,按照下列要求完成对此文稿的修饰并保存:(1)在演示文稿开始处插入一张“标题幻灯片”,作为演示文稿的第一张幻灯片,输入主标题为:“计算机世界”;输入副标题:“IT应用咨询顾问”,设置字体字号为:楷体GB23
Englishisoneoftheworld’smostwidelyspokenlanguages.ThisispartlybecauseitwasthelanguageoftheBritishEmpire.T
最新回复
(
0
)