首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
2015-08-28
38
问题
有下面程序代码:
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 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/OILp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名为List1的列表框、一个名为Label1的标签。列表框中显示若干城市的名称。当单击列表框中的某个城市名时,在标签中显示选中城市的名称。下列能正确实现上述功能的程序是______。
执行如下语句:a=InputBox("Today","Tomorrow","Yesterday","Daybeforeyesterday",5)将显示一个输入对话框,在对话框的输入区中显示的信息是______。
以下叙述中错误的是______。
窗体上画一个名称为Command1的命令按钮,然后编写如下程序:OptlonBase1PrlveteSubCommand1_Click()DimsAsVarianta=Array(1,2,3,4,
下列说法错误的是______。
在窗体上面画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA___KeyPress(Keyasciiasinteger)......EndSub若焦点位于文本框中,则能够触发K
在窗体上画一个文本框和一个图片框,然后编写如下两个事件过程:PrivateSubForm_Click()Text1.Text="VBProgramming"EndSubPrivateSubTextl_Cha
语句DimArr(-3To5)AsInteger定义的数组元素个数是()。
只能用来显示文本信息的控件是()。
窗体中有图片框(Picture1)和计时器(Timer1)两个控件。程序运行时,将图片加载到图片框中,然后图片框以每秒一次的速度向窗体的右下角移动,每次向左、向右移动300twip。请填空。PrivateSubForm_Load0Picture1.
随机试题
A.骨骼B.肾脏C.肝脏D.骨髓E.神经组织铅的主要蓄积部位是()
支气管哮喘的肺功能异常,主要表现在
治疗要获得患者的知情同意,其道德价值应除外
血管紧张素转化酶(ACE)抑制剂卡托普利的化学结构是
投入施工现场的劳动力由()组成。
根据企业所得税相关规定,关于研发费用加计扣除的说法。正确的有()。
某企业只生产一种产品,2011年产销量为5000件,每件售价为240元。成本总额为850000元。在成本总额中,固定成本为235000元,变动成本为495000元,混合成本为120000元(混合成本的分解公式为Y=40000+16X),2012
在订立合同的过程中,假借订立合同,蓄意进行磋商的,给对方造成损失的,应承担的责任是()。
PrintFormat(1234.56,"###.#")语句的输出结果是
在软件开发中,需求分析阶段产生的主要文档是()。
最新回复
(
0
)