首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Commandl_Click() Dim count(10)As Intege
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Commandl_Click() Dim count(10)As Intege
admin
2018-10-15
42
问题
窗体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:
Private Sub Commandl_Click()
Dim count(10)As Integer’第1个For循环
For i=0 To 9
count(i)=0
Next
S=Trim(Textl.Text)
strLen=Len(s)’第2个For循环
For i=1 To strLen
c=Mid(s,i,1)
Ifc>=”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)+l,只能顺序的令每一个数组元素都加1,只有改写成count(x)=count(x)+1,让x作为下标,才能保证让x对应的数组元素加1。
转载请注明原文地址:https://kaotiyun.com/show/LFFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:PrivateSubCommand1_Click()Staticaa=1:b=2:c=3Callf(a,b,c)Print
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()Fori=3To1Step-1Sum=0Forj=1Toi
设有如下通用过程:PublicFunctionFun(xStrAsString)AsString DimtStrAsString,strLAsInteger tStr="" strL=Len(xStr) i=
下面关于标准模块的叙述中错误的是( )。
设有数组声明:Dims(2,3),下面错误的程序段是
以下语句或子句中,符合VisualBasic语法要求的是
下面不属于对象主要特征的是
下面能正确定义二维数组的是
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
以下变量名中合法的是()。
随机试题
复发性口腔溃疡的临床特征不包括
患者,女性,45岁。有胆囊结石5年,曾胆绞痛发作3次,B超示胆囊结石5枚,其中最大直径约为3cm,首选的治疗方法是
患者,男性,28岁。诊断为尺骨骨折22天,下列并发症可出现的是
在建设方案进行比选时,参与比选的各建设方案应首先满足()的要求。
关于重大危险源控制系统,下列说法错误的是()。
在违反工程建设法律规范的行政责任中,()是适用范围较为广泛的一种。
按现行会计制度及有关规定,下列会计报表中属于静态会计报表的是()。
在安排发展性支出时,首先应安排的是()。
根据《证券法》的规定,下列信息中,属于内幕信息的有()。
【S1】【S8】
最新回复
(
0
)