首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base0 Private Sub Command1_Click() Dim A1(4)As Integer,A2(4)As Integer For k=0To2 A1(k+
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码: Option Base0 Private Sub Command1_Click() Dim A1(4)As Integer,A2(4)As Integer For k=0To2 A1(k+
admin
2016-09-19
47
问题
在窗体上画一个命令按钮,名称为Command1,然后编写如下代码:
Option Base0
Private Sub Command1_Click()
Dim A1(4)As Integer,A2(4)As Integer
For k=0To2
A1(k+1)=InputBox("请输入一个整数")
a2(3-k)=A1(k+1)
Next k
PrintA2(k)
End Sub
程序运行后,单击命令按钮,在输入对话框中依次输入2、4、6,则输出结果为
选项
A、0
B、1
C、2
D、3
答案
C
解析
奉题的关键之处在于抓住每次具体给哪个数组元素进行了赋值,第一次循环中输入的2被赋给了A1(1)和A2(3),第二次循环中输入的4被赋给了A1(2)和A2(2),第三次循环中输入的6被赋给了A1(3)和A2(1),跳出循环时k的值为3,所以最后输出2。
转载请注明原文地址:https://kaotiyun.com/show/DOLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上添加一个按钮,名为Command1,然后编写如下的事件过程,输出结果为PrinvateSubComandl_Click() Fori=1To4 x=4 Forj=1To3
在窗体模块的声明段中用Public定义的变量可以在________模块中使用,而用Dim或Private关键字定义的变量可以在_______模块中使用。
下列程序运行时,若输入123,输入对话框的提示信息是______。PrivateSubCommand1_Click()X1=InputBox("请输入") MsgBox(X1)EndSub
设窗体上有一个名为Text1的文本框,并编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text1.SetFocusEndSubPrivateSubForm
下列块结构条件语句,正确的是()。
窗体上有一个名称为CommonDialogl的通用对话框,一个名称为Commandl的命令按钮,并有如下事件过程:PrivateSubCommand1_Click()ComrnonDialog1.DefaultExt=“d
下列可以激活属性窗口的操作是()。
下列选项中不属于软件生命周期开发阶段任务的是()。
下列关于通用对话框CDI的叙述中,错误的是()。
数据结构作为计算机的一门学科,主要研究数据的逻辑结构、对各种数据结构进行的运算,以及()
随机试题
女性,28岁。近2周来感颈前部及咽部疼痛,伴怕热、心慌、多汗,全身乏力不适就诊。体检:体温38℃,消瘦、皮肤多汗。无突眼。甲状腺I度肿大,双侧均有压痛。杂音(一),双手细微震颤(+)。对于本病的治疗,下列哪项是不合理的
关于电源电阻的解释,正确的是
玻璃离子粘固剂修复术与银汞合金修复术相比在窝洞制备上的特点为
建设工程施工或者农业生产中,任何单位或者个人发现文物,应当保护现场,立即报告当地文物行政部门,文物行政部门接到报告后,应当在24小时内赶赴现场,并在()日内提出处理意见。
在计算个体工商产生产经营所得时,不得在个人所得税税前扣除的项目有( )。
甲公司经营不善,进行破产清算,以下说法中正确的是()。
某商厦为增值税一般纳税人,适用增值税税率17%,2007年10月经营情况如下:(1)零售货物金额79.56万元;(2)采取分期收款方式销售货物一批,销售额30万元,并开具等额专用发票一张,合同规定当月收取10万元;(3)当期支付购销货物运费4.5万元,取
关于建筑给水系统的说法,正确的是()
在一次数学测验之后,教师用一节课的时间对考试中学生常犯的错误进行了讲解和总结,并介绍优秀试卷.这堂课是().
情景:你得到了一块新手表,这是你父亲送你的生日礼物。任务:用英语写一篇50词左右的短文,描述一下你的手表。内容包括:.这块表看起来很漂亮。.它不是很贵,但对你来说非常重要。.父亲希望你每天按时上课,争取做个好学生。
最新回复
(
0
)