首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox(”请输入一个多位整数”) Fo
有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox(”请输入一个多位整数”) Fo
admin
2019-04-29
26
问题
有下面程序代码:
Option Base 1
Private Sub Commandl_Click()
Dim a(10)As Integer,x,b
x=InputBox(”请输入一个多位整数”)
For k=1 To Len(x)
b=Mid(x,k,1)
a(Val(b)+1)=a(Val(b)+1)+1
Next k
For k=1 To 10
Print a(k);
Next k
End Sub
程序运行时,单击命令按钮Commandl,输入2355270224,则输出是
选项
A、1 0 4 1 1 2 0 1 0 0
B、0 4 1 1 2 0 1 0 0 0
C、2 3 5 5 2 7 0 2 2 4
D、4 2 2 0 7 2 5 5 3 2
答案
A
解析
InputBox函数将会返回用户在输入对话框中输入的文本,以字符串的形式返回:在第一个For循环中从前到后依次取出字符串中的每一位数字,然后令对应的数组元素自加1,其中数组的第一位放的是0的个数,所以循环结束后数组中存放的是各个数字出现的个数。
转载请注明原文地址:https://jikaoti.com/ti/eHN0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为
若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是
某人编写了下面的程序PrivateSubCommandlClick()DimaAsInteger,bAsIntegera=InputBox(“请输入整数”):b=InputBox(“请输入整数”)proa:probCall.p
下面是求最大公约数的函数的首部Functiongcd(ByValxAsInteger,ByValyAsInteger)AsInteger若要输出8、12、16这3个数的最大公约数,下面正确的语句是
对于循环队列,下列叙述中正确的是
窗体上有一个名称为Commandl的命令按钮,编写如下事件过程:PrivateSubCommandl_Click()i=0DoWhilei
假定有以下程序段Fori=1To3Forj=5To1Step-1Printi*iNextiNexti则语句Printi*j的执行次数是
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是
窗体上有1仑名称为Text1的文本框;1个名称为Timerl的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timerl的事件过程如下:PrivateSubTimerl_Timer()StaticflagAs
窗体上有1个名称为List1、含有3个项目的列表框,1个名称为Text1的文本框,以及1个Interval属性值为1000的计时器控件Timer1。某人编制了以下程序,希望程序运行时,每隔1秒,Listl中的3个项目能够依次在Text1中循环显示。
随机试题
女性,30岁,背部肿块,红、肿、疼痛3天,寒战、发热39℃,查体:背部肿物3cm×5cm,触之有波动感。当病灶做局部引流和全身应用抗生素后,仍有寒战、高热。最合适的治疗措施是
关于抗菌药物的配伍禁忌A、青霉素B、氨基糖苷类C、头孢菌素类D、红霉素E、两性霉素B与头孢菌素联用可致肾毒性增强的是
术后急性胃扩张的处理,下列措施最重要的是
案情:李某和王某共同抢劫致人死亡,被某中院一审,一审后李某被判死刑,缓期两年执行,王某被判有期徒刑十年。问题:本案如果李某上诉了,王某没有上诉,问二审法院该如何处理?
位于两个安全出口之间的中学普通教室,面积不大于()时可设一个疏散门。
下列相关服务中,属于理财顾问服务的有()。
商店里的货品有标价,如一支钢笔标价为6元。在这里,货币执行的是()的职能。
典型常常是文学至高的美学追求。()
A和B订立的合同中内容约定不明确,按照合同有关条款内容不能确定,且他们又不能通过协商达成协议时,下列解决办法不符合法律规定的是()。
反对中小学生阅读《三国演义》,是一种杞人忧天的行为。这种家长式的焦虑非常可笑,就像劝阻孩子不要碰一块蛋糕一样,没有别的办法,只好说那块蛋糕里面长满了毒素。而事实证明,已经有无数人在吃过那块“蛋糕”之后是安然无恙的,再用夸张的词汇去形容它的不堪就是说谎了。这
最新回复
(
0
)