首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=1
有下面程序代码: Option Base 1 Private Sub Commandl_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") For k=1
admin
2020-04-18
51
问题
有下面程序代码:
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
程序运行时,单击命令按钮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/icTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1Open"c:\f2.txt"ForOut
以下数列:1.1.2.3.5.8.13.21…的规律是从第3个数开始,每个数都是其前面两个数之和。在考生文件夹下有一个工程文件sjt5.vhp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程完成如下功能:选中一个单选按钮后,单击“计算”
分段函数如下:设x中已经有一个数值。下列程序段中,能正确计算y值的是()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:OptionBase1PrivateSubCommand1_Click()Dima(3,3)AsIntegerDimiAsInteger,jAs
以下()控件没有Caption属性。
以下变量名中合法的是()。
以下叙述中错误的是( )。
以下关于列表框控件的叙述中,错误的是
要使菜单项MenuOne在程序运行时失效,应使用的语句是()。
数据库的故障恢复一般是由()来执行恢复。
随机试题
实验室常用乳糖操纵子控制目的基因的表达,将乳糖作为诱导剂使用,它在乳糖操纵子启动表达中的作用是
A.民事责任B.刑事责任C.财产关系D.财产赔偿E.行政责任恢复被违法行为侵害的财产权利是实现
机器装配过程一般分为()。
河南省焦作市下辖某县土地管理部门作出收回甲公司土地使用权的决定。甲公司不服,向法院起诉,法院裁定不予受理。甲公司向焦作市土地管理部门申请行政复议。焦作市土地管理部门受理后,经过审查,作出维持县土地管理部门决定的行政复议决定。请分析法院裁定不予受理是否符合法
下列企业向个人赠送礼品的情形中,不征收个人所得税的有()。
作为调节社会经济运行的一种重要经济杠杆,提高税率通常将()。
材料:停车难题。已成为扰乱城市交通秩序的顽症。一种新的停车模式——“错时停车”已从去年起在北京、南京、武汉等地实施,但是在近一年的发展中,错时停车并没有如人所愿地解决停车难的问题,而是在实施中频频遇阻。在车多位少的情况下,车位成为一种有限而稀缺的
如果的值为[].
已知矩阵是A的一个特征向量,则口所对应的特征值是()。
阅读下面短文,回答下列四道题。文学翻译的最高理想可以说“化”。把作品从一国文字转变成另一国文字,既能不因语文习惯的差异而露出生硬牵强的痕迹,又能完全保存原作的风味,那就算得人于“化境”。十七世纪一个英国人赞美这种造诣高的翻译,比为原作的“_____
最新回复
(
0
)