首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base 1 Private Sub Command 1 Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=1 To Len(x) b=M
有下面程序代码: Option Base 1 Private Sub Command 1 Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=1 To Len(x) b=M
admin
2020-01-02
39
问题
有下面程序代码:
Option Base 1
Private Sub Command 1 Click()
Dim a(10)As Integer,x,b
x=InputBox("请输入一个多位整数")
For k=1 To Len(x)
b=Mid(x,k,1)
a(ValCo)+1)=a(Val(b)+1)+1
Next k
For k=1 To 10
Print a(k);
Next k
End Sub
程序运行时,单击命令按钮Command 1,输入2355270224,则输出是
选项
A、1 0 4 1 1 2 0 100
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/LnTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画1个名称为Frame1、标题为“项目”的框架;框架内有1个名称为opt1的控件数组,该控件数组含有三个标题分别为“篮球”“排球”“足球
如果执行一个语句后弹出如图所示的窗口,则这个语句是
设窗体文件中有下面的事件过程:PrivateSubCommand1_Click()Dims:a%=100:PrintaEndSub其中变量a和s的数据类型分别是
编写如下程序:PrivateSubCommandl_Click()DimhumAsInteger.kAsInteger,nAsIntegernum=InputBox("请输入一个正整数:")k=
有下面程序代码:OptionBase1PrivateSubCommandl_Click()Dima(10)AsInteger,x,bx=InputBox(”请输入一个多位整数”)Fork=1
设一棵满二叉树共有15个结点,则在该满二叉树中的叶子结点数为()。
某二叉树共有12个结点,其中叶子结点只有1个。则该二叉树的深度为(根结点在第1层)
结构化程序设计的3种结构是()。
在关系中凡能惟一标识元组的最小属性集称为该表的键或码。二维表中可能有若干个键,它们称为该表的()。
在结构化方法中,用数据流程图(DFD)作为描述工具的软件开发阶段是()。
随机试题
8岁女孩,因四肢瘫痪就诊,以吉兰-巴雷综合征收入院。目前出现呼吸表浅、咳嗽无力、呼吸道分泌物增加等表现,其最适宜的护理诊断是
A、胺碘酮B、可乐定C、维拉帕米D、地高辛E、氨力农具有交感神经抑制作用的抗高血压药是
在影响动脉血压的诸因素中,搏出量增多而其他因素不变时,脉压增大的主要原因是
患儿,4岁。智能运动发育落后,两眼内侧距离宽,鼻梁低平,双眼外侧上斜,经常伸舌,通贯手为确定诊断需做下述哪项检查
能抑制二氢叶酸还原酶的抗肿瘤药是()。
电梯的()应当对电梯质量及投入运行后的维修保养负责。
影响建筑材料预算价格变动的因素包括( )。
在路拌法水泥稳定土基层施工中,若①准备下承层;②洒水闷料;③拌和;④整形,如下选项中排序正确的是()。
人们常说的物流成本往往主要是指______的物流成本。
HowtoFindTimeforYourselfI.Introduction:waystocarveoutyourowntimeA.【T1】______:toobusy【T1】______B.Desire:some
最新回复
(
0
)