首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
编写如下程序: Option Base 1 Prirate 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
编写如下程序: Option Base 1 Prirate 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
admin
2015-12-09
35
问题
编写如下程序:
Option Base 1
Prirate 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://kaotiyun.com/show/6NLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序的执行结果为PrivateSubCommand1_Click()DimFirStrAsStringFirSt="abcdef"PrintPat(FirStr)EndSubPrivateFunctionPat(xStr
窗体上有Text1、Text2两个文本框及一个命令按钮Command1,编写下列程序:DimyAsIntegerPrivateSubCommand1_Click()DimxAsIntegerx=2Text1.Text=Fun2(F
执行下列程序段后,输出的结果是Fork1=0To4y=20Fork2=0To3y=10Fork3=0To2y=y+10Nextk3,k2,k1Printy
设置标签边框的属性是()。
以下程序代码实现单击命令按钮Commandl时生成20个(0,100)之间的随机整数,存于数组中,打印数组中大于50的数,并求这些数的和。Dimalt(1To20)Fori=1To20arr(i)=NextiS
执行以下程序段后,整型变量C的值为()。a=24b=328SelectCaseb\10Case0c=a*10+bCase1to9c=a*100+bC
下列叙述不正确的是()。
已知数据表A中每个元素距其最终位置不远,为节省时间,应采用的算法是
算法的有穷性是指
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
随机试题
治疗肝性脑病最重要的手段是
下列哪项可引起低渗性缺水
A.普通型前驱期B.普通型败血症期C.暴发型败血症休克型D.暴发型脑膜脑炎型E.普通型恢复期流行性脑脊髓膜炎患者出现面色苍白、四肢末端厥冷,发绀、皮肤呈花斑状,脉搏和血压测不到,呼吸急促,易并发DIC,属于
患儿,男,8岁,因无明原因的急性起病的不规则发热、面色苍白、虚弱无力、皮肤瘀斑和鼻出血10天来诊。入院后行骨髓穿刺检查,诊断为急性淋巴细胞性白血病。该患儿最常见和最危险的并发症是
屋顶上部高出屋面的墙称为:()
根据下面材料回答1-5题:2013年上半年,全国入出境2.19亿人次,同比增长5.07%,其中,内地居民9091.83万人次,港澳台居民1.03亿人次,外国人2538.42万人次。内地居民出境4564.43万人次,同比增长18.36%。
数列{xn}通项
要将一个数字字符串转换成对应的数值,应使用的函数是
Manyteachersbelievethattheresponsibilitiesforlearningliewiththestudent.【C1】______alongreadingassignmentisgiven,
A、Topleasehisfatherwhowassick.B、Tomakemoneyforhisfather.C、TohelptheAmericanLiverFoundation.D、Tostayfreeof
最新回复
(
0
)