首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10)As
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10)As
admin
2017-04-25
93
问题
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序:
Private Sub Command1_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对应的数组元素加l。
转载请注明原文地址:https://kaotiyun.com/show/wLGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
编写如下程序:PrivateSubCommand1_Click()x="abcd"y="1234"Fori=1To4z=z+Mid(x,i,1)+Left(y,1)
下列程序执行后,变量x的值为()。Dima,b,c,dAsSingleDimxAsSinglea=10b=30c=400Ifb>aThend=a:a=b:b=dEnd
结构化方法在系统加工描述中,对组合条件的确定可用下列______方法。
符合结构化原则的三种基本控制结构是顺序结构、____________和循环结构。
在VisualBasic的立即窗口内输入以下语句X=65<CR>PrintChr$(X)<CR>在窗口中显示的结果是
下列程序段的运行结果是:PrivateSubCommand1_Click()DimnASIntegerI=21:n=3dowhileI>nI=I-nLoopPrintIEn
在窗体上画一个文本框,其名称为Text1。为了在程序运行后Text1中的文本不可编辑,应当使用的语句是______。
以下语句的输出结果是______。PrintInt(12346789*100+0.5)/100
下列说法错误的是()。
对变量名说法不正确的是______。
随机试题
Respectforthelawisthefoundationofcivilizedliving._____breaksitwillbepunished.
IntheUnitedStatesthemostpopularformoffolkdancingsincetheearlydayshasbeensquaredancing.Inearlytimes,whenme
某病人诊断为肩关节前脱位不伴有骨折,处理应是()
患者,男性,28岁。近半年来,发现颈部逐渐肿大,无其他不适。超声检查:甲状腺双侧叶大小分别为6.5cm×2.5cm×2.5cm(左侧),6.5cm×2.5cm×2.4cm(右侧),峡部厚为1.1cm,腺体回声增强,不均匀。甲状腺上动脉PSV:78cm/s,
背景资料:某大型水电站工地,施工单位A在重力坝浇筑过程中,管理人员只在作业现场的危险区悬挂了警示牌,夜间施工时,却发生了高空坠落死亡3人的事故。工程建设期间,还时常发生当地群众到建设管理单位及施工工地大量聚集事件。当工程某隐蔽部位的一道工序施工结束,在未
为了保持会计数据的安全与完整,每次上机完毕应及时做好()。
单项工程综合概算是以其所包含的()为基础汇总而成的。
下列关于我国个人住房按揭贷款的表述,正确的是()。
多路复用技术通常分为时分多路复用、()、波分多路复用和码分多路复用。
Drone—ProblemandChancesA)InthefirstincidentonMay29,thepilotofacommercialairlinerdescendingtowardLaGuardiaAirp
最新回复
(
0
)