首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
47
问题
有下面程序代码:
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全国计算机二级
相关试题推荐
命令按钮不支持的事件为
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandl_Click()DimPAsIntegerP=m(1)+m(2)+m(3)PrintpE
(1)在名称为Forml的窗体中面一个名称为L1的标签,其标题为“0”,BordeiStyle属性为1;再添加一个名称为Timerl的计时器。请设置适当的控件属性,并编写适当的事件过程,使得在运行时,每隔一秒钟标签中的数字加1。如图3一170所示的是程序刚
在窗体上画一个名称为Command1的命令按钮,再画两个名称分别为Label1、Label2的标签,然后编写如下程序代码:PrivateXAsIntegerPrivateSubCommand1_Click() X=5:Y=3
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerStaticzAsIntegerx
现有如下程序:PrivateSubCommandl_Click()S=0Fori=lTo5S=S+f(5+i)NextPrint
设变量x中的值是395,则下面语句的输出是Printx\100+((xMod100)\10)*10+(xMod10)*100
在数据库管理技术的发展中,数据独立性最高的是()。
窗体上有1个名称为Labell的标签;1个名称为Listl,且含有若干表项的列表框。为了使得单击Listl中某个表项时,在Labell中相应地显示该表项,应使用的程序代码为
随机试题
教育规划系统性
牙尖交错位咬合接触异常导致的影响中不包括
单位工程施工组织设计中所涉及的技术组织措施应包括( )。
企业财务目标实现的稳健保证是()。
在股票数量一定的情况下,能够反映上市公司股东财富最大化目标实现程度的最佳指标是()。
胆汁质的神经过程的基本特性是()。(2004年12月三级真题)
关于遗忘的理论解释有()。
“法治”一词具有丰富的内涵,具体包括()。
我国对外开放的格局是()
Peopletendtocollectpossessions,sometimeswithoutbeingawareofdoingso.Indeed,theycanhavea【T1】______surprisewhenth
最新回复
(
0
)