首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") Forvk=1 To Len(x) b=Mid(x,k,
有下面程序代码: Option Base 1 Private Sub Command1_Click() Dim a(10)As Integer,x,b x=InputBox("请输入一个多位整数") Forvk=1 To Len(x) b=Mid(x,k,
admin
2019-01-17
80
问题
有下面程序代码:
Option Base 1
Private Sub Command1_Click()
Dim a(10)As Integer,x,b
x=InputBox("请输入一个多位整数")
Forvk=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/9gFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.En
设变量x的值是845,则下面语句的输出是Printx\100+(xMod100)\10+xMod10
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是( )。
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dimn()AsIntegerDima,bAsIntegera=Inpu
设窗体文件中有下面的事件过程:PrivateSubCommand1_Click() Dims a%=100 PrintaEndSub其中变量a和s的数据类型分别是( )。
数学式y2>x>=10在VB中应表示为
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a
由高中数学可知,对于连续函数f(x),若f(x1)与f(x2)值的符号相反,则在x1和x2之间必存在x0,使得fix0)=0(该点称为“零点”)。设有VB函数:PrivateFunctionf(xAsSingle)AsSingle可以返回fix)
随机试题
引起食品腐败变质的主要原因是________。
砷斑法测砷时,生成的砷斑是()的。
腹部实质脏器破裂的临床表现以______为主,空腔脏器破裂的临床表现以______为主。
下列关于个人住房贷款,表述正确的是()
将许多类似的但不会同时发生的风险集中起来考虑,从而使这一组合中发生风险损失的部分能够得到其他未发生损失的部分的补偿,属于()的风险管理方式。
工程建设项目招标投标可分为()。
某公司下设A、B两个投资中心,2010年有关资料见下表:现有两个追加投资的方案可供选择,第一,若A中心追加投入1200000元经营资产,每年将增加150000元部门税前经营利润;第二,若B中心追加投入2000000元经营资产,每年将增加200000元部
根据下面材料,回答问题。2011—2014年,货物进出口总额增长率最高的年份是()。
设立博物馆,应当具备下列()条件。
Oracle系统不仅具有高性能的RDBMS,而且提供全过程的应用开发工具。如果要进行数据库建模,使用的是
最新回复
(
0
)