首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有下面程序代码: 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
2019-06-20
55
问题
有下面程序代码:
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/iMUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在VB中,函数过程与子程序过程的区别之一是
如果一个顶级菜单项的访问键为D,则以下等同于单击该菜单项的操作为
在考生文件夹下有一个工程文件sit5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Labell和Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Text1和Text2、初始值
在考生目录下有一个工程文件sit5.vbp。窗休左边的图片框名称为Picturel,框中还有六个小图片框,它们是一个数组,名称为Pic,住窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大”和“
设有如下关系表:则下列操作中正确的是
在软件开发中,需求分析阶段产生的主要文档是
定义学生、教师和课程的关系模式S(S#,Sn,Sd,Dc,SA)(其属性分别为学号、姓名、所在系、所在系的系主任、年龄);C(C#,Cn,P#)(其属性分别为课程号、课程名、先修课);SC(S#,C#,G)(其属性分别为学号、课程号和成绩),则该关系为(
设数据结构B=(D,R),其中D={a,b,c,d,e,f}R={(f,a),(d,b),(e,d),(c,e),(a,c)}该数据结构为()。
支持子程序调用的数据结构是( )。
随机试题
19世纪30年代取代浪漫主义成为流行欧洲的文学潮流的是_______。
高I/O设备成块交换数据,可以利用______方式传送数据。
根据《建筑设计防火规范》,下图中住宅的建筑高度应为:
某纳税人在税务机关责令缴纳拖欠税款和滞纳金期限届满,仍未缴纳的,税务机关可以采取的强制执行措施有()。
下列选项中不属于贷款基本信息的内容是()
甲将笔记本电脑借给乙,乙不小心遗失,丙拾得后卖给丁。对此,下列表述符合物权法律制度规定的是()。
关于成本法与权益法之间的转换,下列说法正确的有()。
某市质量技术监督局、卫生局、工商局根据市人民政府的统一部署,开展了对全市餐饮业卫生情况的执法大检查。在检查过程中,卫生局发现了一家餐饮业企业存在严重的卫生不达标问题,即对其进行了处罚,餐饮企业不服,认为处罚太重,提起行政复议,下列行政机关中,可作为被申请人
木椅子效应是指将成绩相等的两组学生分别安排坐在舒适的沙发椅和很不舒服的木椅子上学习,不久之后,坐木椅子的学生学习成绩要比坐沙发椅的学生成绩高出许多。原因是坐木椅子的学生因为不舒服而不断调整坐姿,表面看来好像不安而好动,实质却因此给脑部供应了更多的血液和营养
ThesixteenthinternationalAIDSconferenceopenedonSundayinToronto,Canada.Morethantwenty-fourthousanddelegatesfromo
最新回复
(
0
)