首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base1 Private Sub Command1_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=1 To Len(x) b=Mid(x,k,1
有下面程序代码: Option Base1 Private Sub Command1_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=1 To Len(x) b=Mid(x,k,1
admin
2019-07-30
66
问题
有下面程序代码:
Option Base1
Private Sub Command1_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
程序运行时,单击命令按钮Command1,输入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://kaotiyun.com/show/WpUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
满足下列条件之一的年份是闰年:1)年份能被4整除但不能被100整除2)年份能被400整除若y代表年份,下面判断闰年的正确表达式是
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()m=-3.6IfSgn(m)Thenn=Int(m)Elsen=Abs(m)EndIfPr
为了使标签具有“透明捧的显示效果,需要设置的属性是
设窗体上有Text1、Text2两个文本框,并编写了下面的程序代码:PrivateSubText1_KeyPress(KeyAsciiAsInteger)If"A"<=Chr(KeyAscii)AndChr(KeyAscii)<="Z"Th
窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作韵事件过程是
以下关于多重窗体程序的叙述中,错误的是
假定有如下语句:answer$=MsgBox("String1","String2","String3",2)执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则answer$的值为
下面函数的功能应该是:删除字符串str中所有与变量ch相同的字符,并返回删除后的结果。例如:若str=“ABCDABCD”,ch=“B”,则函数的返回值为:“ABCDCD”Functiondelchar(strAsString,chAsStr
下列关于数据库设计的叙述中,正确的是()。
随机试题
按照计算机用途划分,工业企业生产中用于控制机床的工控机属于()
阴道自净作用与哪种激素有关( )。
实施促进中部地区崛起战略的发展目标中,到2020年,城镇化率力争达到全国平均水平,基本公共服务主要指标接近()地区水平。
行业的领导者开始出现是在行业生命周期的()。
甲乙双方在合同中对合同履行的地点约定不明确,根据法律规定,给付货币的,应按()履行。
决定必须由()。
导游人员在导游讲解过程中掺杂庸俗、下流、迷信内容的,扣除8分。()
参观游览出发前,导游员必须提前()分钟到达出发地点。
下列叙述中正确的是( )。
Completetheflow-chartbelow.WriteNOMORETHANTHREEWORDSforeachanswer.
最新回复
(
0
)