首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
86
问题
有下面程序代码:
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全国计算机二级
相关试题推荐
下面不属于软件需求分析阶段主要工作的是
结构化程序设计中,下面对goto语句使用描述正确的是
若在窗体模块的声明部分声明了如下自定义类型和数组:PrivateTyperecCodeAsIntegerCaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是( )。
设有如下事件过程:PrivateSubForm_Click()x=0Whilex10x=x+1x=x*xWendPrintxEndSub运行程
决定标签内容显示位置的属性是
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是( )。
设窗体文件中有下面的事件过程:PrivateSubCommand1_Click() Dims a%=100 PrintaEndSub其中变量a和s的数据类型分别是( )。
(1)在名称为Form1,标题为“选课”的窗体上添加一个复选框数组,名称为CHl,共有四个复选框,按顺序其标题分别是“数学”、“语文”、“外语”、“计算机”,其中“语文”、“计算机”复选框处在选中状态下,程序运行时的窗体如图所示。请按要求添加控件并设置相应
(1)在名称为Form1的窗体上添加一个名称为List1的列表框,在属性窗口中为列表框添加三个选项:北京、上海、天津。同时建立一个下拉菜单,其名称为File,标题为“文件”,此菜单含有一个子菜单项,标题为“显示列表框”,名称为Show,初始状态为被选中,运
把数学表达式2y—b表示为正确的VB表达似乎应该是
随机试题
在WindowsXP中进行“全角/半角”切换时,不影响____________的输入。
男性肝硬化患者性欲减退、睾丸萎缩、肝掌的原因是
(2006)热力学中常用的状态参数有()。
硬盘工作时,应特别注意避免()。
每个企业都必须按月编制资产负债表、利润表、利润分配表等主要报表。()
《现场查勘记录》应当由主办查勘人现场制作,制作完毕后需要( )签字。
下列各项中,影响经营活动现金流量的是()。
某女患者,尿频、尿急,经化验检查确诊为大肠埃希菌引起泌尿道感染,宜选用()。
美国心理学家加德纳认为智力的内涵是多方面的,由九种彼此不同、相对独立的智力构成,提出了()
Withthreeyoungchildrentotakecareof,Cathyiskeptontheruneveryminuteoftheday.
最新回复
(
0
)