首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0—9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10) As Intege
窗体上有一个名称为Text1的文本框,一一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0—9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10) As Intege
admin
2016-09-19
108
问题
窗体上有一个名称为Text1的文本框,一一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0—9各数字字符的个数。某人编写如下程序:
Private Sub Command1_Click()
Dim count(10) As Integer’第1个For循环
For i=0To9
count(i)=0
Next
s=Trim(Text1.Text)
strLen=Len(s)’第2个For循环
For i=1To 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=0To9
Print Str(i),count(i)
Next
End Sub
运行程序后,发现不能实现题目的要求,程序应该进行的修改是
选项
A、将第2个For循环的初值改为0
B、将第2个For语句改为For i=0To9
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://www.kaotiyun.com/show/8dLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上用复制、粘贴的方法建立了一个命令按钮数组,数组名为M1。设窗体Form1标题为“myform1”,双击控件数组中的第3个按钮,打开代码编辑器,写下如下代码:PrivaeSubM1_Click(IndexAsInteger)
当用户()时,会引发焦点所在控件的KeyPress事件。
要显示当前过程中的所有变量及对象的取值,可以利用()窗口。
设程序中有如下数组定义和过程调用语句:Dima(10)AsInteger……Callp(a)如下过程定义中,正确的是
下列叙述中正确的是
以下程序的功能是:把父目录下顺序文件smtext1.txt的内容读入内存,并在文本框Text3中显示出来。请选择适合横线处的语句()。PriVateSubCommandlClick()DiminDataAsStrin
假定建立了一个名为Commandl的命令按钮数组,则以下说法中错误的是()。
窗体上有1个名称为Text1的文本框;1个名称为Thner1的计时器控件,其Interval属性值为5000,Enabled属性值是True。Timer1的事件过程如下:PrivateSubTimer1_Timer()Stat
当窗体大小改变时,要使其中的控件也按比例发生变化,应使用窗体的()。
随机试题
通过整合已有构件来完成较大型软件系统的开发方法称为()
Excel2010的数据清单的列表示数据库的__________。
甲亢危象的处理中,不恰当的是
患者身患外感实热病证,兼见喘喝,气不能接续,甚则心悸气短。其病机是
下列选项中不可以和解与调解的是()。
大班与小班幼儿跨班互动近一个学期,幼儿彼此已经比较熟悉。春天的一个周末,教师邀请家长一同参加以大带小的远足活动——“大手拉小手”。活动过程如下:出发前,教师告诉大家今天要去社区附近的人民公园,请两个班的幼儿自愿结对,每个大班幼儿拉起一个小班幼儿的
简述区间估计的置信区间和显著性水平。
结构化程序设计的基本原则不包括( )。
•Readthearticlebelowabouthowtobuildyourcareer.•Aresentences16-22ontheoppositepage’Right’or’Wrong’?Ifth
TheU.S.dollarwassupposedtobeattheendofitsrope.Kickingthebucket.Well,maybenot.Thedollarcontinuesto【C1】_____
最新回复
(
0
)