首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer, x, b x = InputBox("请输入一个多位整数")
有下面程序代码: Option Base 1 Private Sub Command1_Click() Dim a(10) As Integer, x, b x = InputBox("请输入一个多位整数")
admin
2019-06-20
29
问题
有下面程序代码:
Option Base 1
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
解析
Len函数获取整数的位数并作为For循环的边界。Mid函数从循环变量指定的地方获取字符并赋值给b。Val函数取b的数值。For循环完成对数组a的元素赋值。第二个for循环进行打印。选A)。
转载请注明原文地址:https://kaotiyun.com/show/iMUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要使标签中的文本靠右显示,应将其Aligment属性设置为
利用通用对话框控件打开字体对话框的操作是
窗体上有一个用菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。以下叙述中错误的是
(1)在考生文件夹中有工程文件sit3.vbp,其中的窗体如图2.127所示。程序刚运行时,会生成一个有10个元素的整型数组。若选中“查找最大值”(或“查找最小值”)单选按钮,再单击“查找”按钮,则找出数组中的最大值(或最小值),并显示在标签Label2中
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Forml的窗体上画一个名称为Pic的图片框,通过属性窗口将考生文件夹下的文件Tul-1jpg添加剑图片框,然后编写适当的事件过程。运行程序时,单击窗体,
设有以下函数过程PrivateFunctionFun(a()AsInteger,bAsString)AsInteger…EndFunction若已有变量声明:Dimx(5)AsInteger,nAsInteger,chA
下列数据结构中,能用二分法进行查找的是()。
在深度为7的满二叉树中,叶子结点的个数为
以下数据结构中,属于非线性数据结构的是()。
下列运算符中,优先级别最高的是
随机试题
车床的动力是由电动机经过带轮,再通过()传递给主轴的。
患者,男性,64岁。因呕血、黑便2小时入院。既往有慢性乙型肝炎10余年。入院检查:ALT124U/L.AST、153U/L,总胆红素91μmol/L,血清白蛋白16g/L,凝血酶原时间21s,CO2CP15mol/L,BUN20.5mmol/L.C
A.羟丙甲纤维素B.微晶纤维素C.羧甲基淀粉钠D.甜蜜素E.滑石粉阿奇霉素分散片处方中,崩解剂为()
某博物馆项目竣工验收后,建设单位办理工程竣工验收备案应当提交的文件有()。
在直接标价法下,外汇汇率下跌,说明外币币值上升,本币币值下降。()
德育过程的基本矛盾是()。
关于下列节气的说法错误的是:
评《学记》对教育理论的贡献及历史地位。
(08年)设随机变量X与Y相互独立,X的概率分布P{X=i}=(i=一1,0,1),Y的概率密度为fY(y)=记Z=X+Y.(Ⅱ)求Z的概率密度fZ(z).
如果让我来决定我们是要一个没有自行车的城市,还是要一个没有汽车的城市,我会毫不犹豫地选择后者。
最新回复
(
0
)