首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
运行下列程序: Private Sub Form Click() Sum=0 For i=1 To 100 If Mid(CStr(i),1, 1)="1" Then Sum=Sum+1
运行下列程序: Private Sub Form Click() Sum=0 For i=1 To 100 If Mid(CStr(i),1, 1)="1" Then Sum=Sum+1
admin
2009-02-13
63
问题
运行下列程序: Private Sub Form Click() Sum=0 For i=1 To 100 If Mid(CStr(i),1, 1)="1" Then Sum=Sum+1 End If Next i Print Sum End Sub 单击窗体后,在窗体上显示的结果是
选项
A、12
B、13
C、14
D、15
答案
1
解析
本题的功能是将1~100之间以“1”为开头数的个数加起来,其结果赋值给变量 Sum,最终结果为12。Mid(x,n1,n1)从x字符串左边第n1个位置开始向右起取n1个字符, CStr(n)将一数值n转换成第一位非空字符的字符串型。
转载请注明原文地址:https://kaotiyun.com/show/Zb1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
给出下列的程序段,m为何值时将会输出default?()switch(m){case0:System.out.println("case0");case1:System.out.println("cas
下列哪个选项是Java调试器,如果编译器返回程序代码的错误,可以用它对程序进行调试?()
Java类库提供的Applet类是所有______程序的根。
只能用在循环语句中的是()。
下列语句序列执行后,j的值是()。intj=3,i=2;while(--i!=i/j)j=j+2;
下列哪个命令是在当前主机的指定端口上启动远程对象注册服务程序?()
容器被重新设置大小后,哪种布局管理器的容器中的组件大小不随容器大小的变化而改变?()
______类是所有类的根,它所包含的属性和方法被所有类继承。()
数据库系统支持数据的逻辑独立性,依靠的是()
请指出在顺序表{2、5、7、10、14、15、18、23、35、41、52}中,用二分法查找关键码12须做()次关键码比较。
随机试题
全口义齿应具有平衡,以下说法正确的是
负责单位内部会计监督制度的组织实施,对本单位内部会计监督制度的建立及有效实施承担最终责任的是( )。
保险公估人的( )包括勘验职能、鉴定职能、估损职能和理算职能等。
包含三个音级的音程叫()音程。
现代的学校咨询与辅导起源于20世纪初美国的“指导运动”。()
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性:
高速缓冲存储器是为了解决
Quevoussoyezàlarecherched"unpremierjob,d"unnouvelemploi,en______surlemarchédutravailouenréflexionsurvotre
What’sAllen’snewjob?
Islanguage,likefood,abasichumanneed?JudgingfromtheresultoftheviolentexperimentbyaGermanKing,FrederickII,in
最新回复
(
0
)