首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Prirate Sub Commandl_Click() Dim count(10)As Integer’
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Prirate Sub Commandl_Click() Dim count(10)As Integer’
admin
2019-06-11
54
问题
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:
Prirate Sub Commandl_Click()
Dim count(10)As Integer’第1个For循环
For i=0 To 9
count(i)=0
Next
s=Trim(Text1,Text)
strLen=Len(s)’第2个For循环
For i=1 To strLen
c=Mid(s,i,1)
If c>="0"And c<="9"Then
x=Val(c):count(i)=count(i)+1
End If
Next’第3个For循环
For i=0 To 9
Print Str(i),count(i)
Next
End Sub
运行程序后,发现不能实现题目的要求,程序应该进行的修改是
选项
A、将第2个For循环的初值改为0
B、将第2个For语句改为For i=0 To 9
C、去掉x=Val(c)语句
D、将count(i)=count(i)+1改为count(x)=count(x)+1
答案
D
解析
本题中要求分别统计数字0~9的个数,使用了一个数组count来存放各个数字的个数。在第一个For循环中,将数组的各个元素设置为0,在第二个循环中,依次取出字符串中的每一个字符,判断是不是在0~9之间,如果在范围内,则应该令对应的数组元素加1。如果写成count(i)=count(i)+1,只能顺序的令每一个数组元素都加1,只有改写成count(x)=count(x)+1,让x作为下标,才能保证让x对应的数组元素加1。
转载请注明原文地址:https://kaotiyun.com/show/TkUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)请在名称为Forml的窗体上添加一个名称为H1的水平滚动条,并在属性窗口中设置它的属性值,使其满足下列要求:它的最小刻度值为1,最大刻度值为100,在程序运行时,用鼠标单击滚动条上滚动框以外的区域(不包括两边按钮),滚动框移动10个刻度。再在滚动条下
(1)在名称为Form1的窗体上添加两个名称分别为Frame1、Frame2的框架,标题分别为“字号”、“修饰”;在Frame1中添加两个单选按钮,1名称分别为Option1、Option2,标题分别为“10号字”、“20号字”,且标题显示在单选按钮的左边
在考生文件夹中有一个工程文件sjt5.vbp。窗体外观如图所示。运行程序,单击“读数据”按钮,读入文件中的数据到字符串变量中并显示在Label2标签中。单击“排序”命令按钮时,对读入的数据从小到大进行排序,并将排序结果在窗体的Label4控件中显示。
(1)存名称为Form1的窗体上添加一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹
在窗体上建立三个菜单(名称分别为:Read、Cale和Save,标题分别为“读入数据”、“计算并输出和“存盘”),然后再添加一个文本框,名称为Text1,MultiLine属性设置为True,ScrollBars属性设置为2(如图所示)。程序运行后,如果执
(1)在名称为Form1的窗体上添加一个名称为L1,标题为“业余爱好”的标签,再添加一个名称为Ch1的复选框数组,含3个复选框,它们的Index属性分别为0、1、2,标题依次为“体育”、“音乐”、“美术”,请设置复选框的属性,使其初始状态如下表所示。
设在窗体上有一个名称为Check1的复选框数组,并有以下事件过程:PrivateSubCheck1_Click(IndexAsInteger)EndSub则下面叙述中错误的是
下列关于菜单项的描述中,错误的是
下列关于水平滚动条的叙述中,错误的是
随机试题
保护会阴最主要的要点是()
男性,22岁,飞机起飞前因座位上方行李滑下,致颅脑损伤入院2小时后,突然出现心跳、呼吸骤停,立即行人工复苏术,并实施电除颤成人首次胸外除颤的电能为()
具有补气养血,调经止带功效的中成药是
下列哪项不符合胸壁疾患所致胸痛的特点()
胜利快餐店是由王某、李某、赵某和徐某合伙出资开办的企业,开业一年来经营不佳,亏损2万元。以下几种情况中,不属于合法退伙事由的有:()
评估报告应由评估机构法人代表和至少()名注册资产评估师签名盖章。
甲公司为增值税一般纳税人,主要生产和销售洗衣机。2014年3月有关经济业务如下:(1)购进一批原材料,取得增值税专用发票上注明的税额为272000元;支付运输费,取得增值税专用发票上注明税额2750元。(2)购进低值易耗品,取得增值税普通发票上注明的税
小说:诗歌:文学
Atlasthereffortsborefruit.BurtonwasappointedtoSantos,inBrazil,whereIsabelmightalsogo.Theymadetheirfarewell
A、6milliondollars.B、25milliondollars.C、6,000dollars.D、400milliondollars.B短文说:“制造这种飞机至少要花费2500万美元。”故答案为B。
最新回复
(
0
)