首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Commandl_Click() Dim count(10
体上有一个名称为Textl的文本框,一个名称为Commandl的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Commandl_Click() Dim count(10
admin
2018-10-18
19
问题
体上有一个名称为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)
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?语句
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/BxFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要想不使用Shift或Ctrl键就能在列表框中同时选择多个项目,则应把该列表框的MultiSelect属性设置为
下面不能作为结构化方法软件需求分析工具的是
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1Open"c:\f2.txt"ForOut
设Label1、Command1、Text1、Check1分别为标签、命令按钮、文本框、复选框的名称,则以下属性设置语句中,运行时不会出错的是
以下不能用Print方法输出数据的对象或窗口是
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()Fori=3To1Step-1Sum=0Forj=1Toi
以下关于VB特点的叙述中,错误的是
假定有以下循环结构:DoUntil条件表达式 循环体Loop则以下正确的描述是( )。
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
随机试题
由于金融市场上金融工具交易价格的波动而给金融工具的持有者带来损失的可能性,这种风险被称为
对狂犬病病犬做病理检查,能在细胞浆内见嗜酸性包涵体的是
下列药品中,保管中最易受潮变质的是
甲、乙两公司因担保合同发生争议,争议数额为100万元人民币。现依据担保合同的仲裁条款申请仲裁,本案应按下列哪项组成仲裁庭?()
如果个人信用贷款发生展期,则展期前的利息按照()计付。
如贷款为分期逐笔到期,在出现贷款逾期时,银行应逐笔进行书面确认,逐笔保证()的诉讼时效。
2010年食物与营养发展总体目标不包括()。
在社区矫正工作中,社会工作者通过综合治理,改善矫正对象的生活环境,并通过社区教育形成有利于矫正对象改过自新的社会氛围。这些做法是()在矫正社会工作中的运用。
“十一五”期间,我国网民平均每年增长()。
已知x≥0时,g(x)可导,ln(1+x)是g(x)的一个原函数,且求
最新回复
(
0
)