编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1，2，3，4)：s=0：j=1 For i=4 To 1 Step-1

admin2018-10-15 31

问题编写如下程序：
Option Base 1
Private Sub Commandl_Click()
Dim a
a=Array(1，2，3，4)：s=0：j=1
For i=4 To 1 Step-1
S=S+a(i)*j：j=j*10
Next i
Print s
End Sub
程序运行后，单击命令按钮Commandl，输出结果为

选项 A、110
B、123
C、1234
D、4321

答案C

解析本题的循环首先取出数组的最后一位累加，然后取出倒数第二位乘以10以后累加；然后取出倒数第三位乘以100后累加……以此类推，最终结果为1234。

转载请注明原文地址:https://jikaoti.com/ti/cmm0FFFM

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click()　　Open"out.txt"ForOutputAs#2　　Print"Text1"　　Close
设窗体文件中有下面的事件过程：PrivateSubCommand1_Click()　　Dims　　a%＝100　　PrintaEndSub其中变量a和s的数据类型分别是(　　)。
在程序中发现有语句：Put#1，2，num并且能够正确执行，因此可以判断
某人在窗体模块中定义了如下自定义类型：TypeRecnumAsIntegernameAsStringEndType但发现程序不能运行，关于这一问题，下面叙述中正确的是
编写如下程序：PrivateSubCommand1_Click()Dima%,b%,c%a=8:b=3Doc=a-bPrintc;a=b
假定有以下通用过程：FunctionFun(nAsInteger)AsInteger　　x＝n*n　　Fun＝x－11EndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateS
以下可以判断是否在文本框（名称为Text1）内按下了回车键的事件过程是
在黑盒测试方法中，设计测试用例的主要根据是(　　)。
以下说法中正确的是(　　)。
下列说法中，错误的是(　　)。

随机试题

按病种付费(diagnosisrelatedgroups(DRGs))
患者，男，15岁。淋雨后鼻塞，流清涕，干咳，伴头痛、肌肉酸痛，次日食欲差，腹泻2次，为糊状便。查体：体温37．5℃，心率92次／分，血压100／60mmHg，结膜、咽部充血，鼻黏膜充血水肿，上颌窦无压痛，颈部及颌部淋巴结未触及，双肺呼吸音清晰，上腹部轻压痛
强心苷治疗心功能不全疗效最好的适应证是
原核生物DNA复制起始过程中，①DNA-polⅢ，②SSB，③引物酶和④解螺旋酶的作用顺序是
建设用地使用权出租的主体是()。
物流活动中，流体的价值系数可以反映商品的贵贱，对物流部门确定物流作业方案有重要参考价值。流体的价值系数是指()。
在连续编制合并财务报表时，不仅需要将上期资产减值中的内部应收账款计提的坏账准备对本期期初未分配利润的影响数予以抵销，还需要将本期个别财务报表中内部应收账款所对应的坏账准备相对于上期的增减变动数予以抵销。()
下列在中国境内无住所的外籍人员中，属于中国居民纳税人的是()。
材料2009年，我们伟大祖国迎来了60周年华诞。新中国成立以来特别是改革开放以来，在中国共产党领导下，昔日积贫积弱的中国发生了翻天覆地的历史巨变，勤劳勇敢的中国人民在古老的华夏大地上创造了震古烁今的人间奇迹，谱写了中华民族自强不息、顽强奋进新的壮
Sincelifebeganeonsago,thousandsofcreatureshavecomeandgone.Some,suchasthedinosaurs,becameextinctduetonatural

最新回复(0)

编写如下程序： Option Base 1 Private Sub Commandl_Click() Dim a a=Array(1，2，3，4)：s=0：j=1 For i=4 To 1 Step-1

二级VB

NCRE全国计算机二级

某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close

设窗体文件中有下面的事件过程：PrivateSubCommand1_Click() Dims a%＝100 PrintaEndSub其中变量a和s的数据类型分别是( )。

在程序中发现有语句：Put#1，2，num并且能够正确执行，因此可以判断

某人在窗体模块中定义了如下自定义类型：TypeRecnumAsIntegernameAsStringEndType但发现程序不能运行，关于这一问题，下面叙述中正确的是

编写如下程序：PrivateSubCommand1_Click()Dima%,b%,c%a=8:b=3Doc=a-bPrintc;a=b

假定有以下通用过程：FunctionFun(nAsInteger)AsInteger x＝n*n Fun＝x－11EndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateS

以下可以判断是否在文本框（名称为Text1）内按下了回车键的事件过程是

在黑盒测试方法中，设计测试用例的主要根据是( )。

以下说法中正确的是( )。

下列说法中，错误的是( )。

按病种付费(diagnosisrelatedgroups(DRGs))

强心苷治疗心功能不全疗效最好的适应证是

原核生物DNA复制起始过程中，①DNA-polⅢ，②SSB，③引物酶和④解螺旋酶的作用顺序是

建设用地使用权出租的主体是()。

物流活动中，流体的价值系数可以反映商品的贵贱，对物流部门确定物流作业方案有重要参考价值。流体的价值系数是指()。

下列在中国境内无住所的外籍人员中，属于中国居民纳税人的是()。

Sincelifebeganeonsago,thousandsofcreatureshavecomeandgone.Some,suchasthedinosaurs,becameextinctduetonatural

某人编写了下面的程序，希望能把Text1文本框中的内容写到out.txt文件中：PrivateSubCommand1_Click()　　Open"out.txt"ForOutputAs#2　　Print"Text1"　　Close

设窗体文件中有下面的事件过程：PrivateSubCommand1_Click()　　Dims　　a%＝100　　PrintaEndSub其中变量a和s的数据类型分别是(　　)。

假定有以下通用过程：FunctionFun(nAsInteger)AsInteger　　x＝n*n　　Fun＝x－11EndFunction在窗体上画一个命令按钮，其名称为Command1，然后编写如下事件过程：PrivateS

在黑盒测试方法中，设计测试用例的主要根据是(　　)。

以下说法中正确的是(　　)。

下列说法中，错误的是(　　)。