首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
2020-02-27
76
问题
有下面程序代码:
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.04112e+009
B、4.11201e+008
C、2.35527e+009
D、4.22073e+009
答案
A
解析
Len函数获取整数的位数并作为For循环的边界。Mid函数从循环变量指定的地方获取字符并赋值给b。Val函数取b的数值。For循环完成对数组a的元素赋值。第二个For循环进行打印。选A。
转载请注明原文地址:https://kaotiyun.com/show/ZCTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面事件过程:PrivateSubCommand1_Click()a=5b=8Fork=1To30c=b-aa=bb=cNextkPrintcEndSub上面事件过程执行后产生的输出是()。
有如下程序代码:PrivateSubForm_Click()DimxAsInteger,yAsInteger,numAsIntegerx=3y=xDoUntilx>=6num=x*yPrint"num=":humx=x
窗体上有1个名称为Command1的命令按钮,能够使其向左移动100的语句是()。
下列叙述中错误的是()。
编写如下程序代码:OptionExplicitPrirateSubForm_Click()DimxAsVariantDimiAsVariantx=Array(50,27,69,80,45)ForEachiInxIf
设窗体上有一个名称为Text1的文本框,程序运行时,要求该文本框不能接受键盘输入,但能输出信息,以下属性设置正确的是()。
设程序中定义了下面的过程:PrivateSubproc(chAsString)PrintchEndSub下面语句中错误的是()。
针对VisualBasic的菜单设计操作,下面叙述中错误的是()。
下列语句中,不能用于定义数组的关键字是()。
现有语句:y=IIf(x>0,xMod3,0)设x=10,则y的值是()。
随机试题
Ifyouhavehighbloodpressure,you’reingood【C1】________Hypertensionaffects67millionAmericans,includingnearlytwo-third
A.蠕动B.分节运动C.集团蠕动D.容受性舒张胃肠道共有的运动形式为
紫参是下列哪味药的别名
受法律保护的物权有( )。
战略管理开始提出的时间大约是20世纪()。
在WindowsXP默认环境中,下列哪个组合键能对选定的文档进行剪切操作?()
学制的发展与完善经历了漫长的历史进程。现代学制包括()。
《三国演义》开篇称:“天下大势,分久必合,合久必分。”但是这句话未必准确,因为:
取前伸位关系记录是为了确定()。
Theattempttobreedsuitablevarietiesofjojobabyusinghybridizationto(i)______favorabletraitswasfinallyabandonedin
最新回复
(
0
)