首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10)As Integer’
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10)As Integer’
admin
2018-10-18
30
问题
窗体上有一个名称为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=1To strLen
c=Mid(s,i,1)
If c>="0"Andc<="9"Then
x=Val(c):count(i)=count(i)+1
EndIf
Next’第3个For循环
For i=0 To 9
Print Str(i),count(i)
Next
End Sub
运行程序后,发现不能实现题目的要求,程序应该进行的修改是
选项
A、将第2个For循环的初值改为0
B、将第2个For语句改为Fori=0To9
C、去掉x=Val(c)语句
D、将count(i)=count(i)+1改为count(x)=count(x)+1
答案
D
解析
本题中要求分别统计数字O~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/gxFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)
以下不合法的VB变量名是
窗体上有一个名称为Command1的命令按钮,并有如下程序代码:OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerDimb
要将单选按钮Opt1设为被选中,应设置的属性是
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
将窗体的KeyPreview属性设为True,然后编写如下程序:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAsInteger)PrintChr(KeyCode)
在窗体上画两个单选按钮,名称分别为Option1、Option2,标题分别为"宋体"和"黑体";1个复选框(名称为Check1,标题为"粗体")和1个文本框(名称为Text1,Text属性为"改变文字字体"),窗体外观如图所示。程序运行后,要求"宋体"单选
以下关于文件的叙述中,错误的是( )。
下列关于控件数组的叙述中,正确的是
在下面语句或函数中,不能描述选择结构的是()。
随机试题
简述侵犯著作权的法律责任类型。
海明威获得诺贝尔文学奖的作品是()
心火亢盛所致的心神不宁,应首选
阿伏伽德罗常数值6.0221367×1023mol—1为约定真值。()
许多国家的发展进程表明,人均国内生产总值突破()美元之后,经济社会发展将进入一个关键时期。
期货品种既可以是(),也可以是()。I.实物商品Ⅱ.即期交易Ⅲ.金融产品Ⅳ.远期交易
某税务师在2016年5月对某工业企业2015年度年终结账后的纳税情况进行审查时发现,该企业2015年9月将用于管理费用支出的50000元记入到“长期待摊费用”,该项“长期待摊费用”项目已于2015年11月开始摊销记入“生产成本”。该企业各月份均无在产品余额
代理人和第三人恶意串通,损害被代理人的利益,由代理人和第三人负连带责任。()
以其壮观之势,被公认为我国瀑布之首的是()。
关于举荐刘德峰等5位同志参加赴日考察活动的请示报告C省商务局:根据贵局《C省商务局关于组织全省2009年度赴日商务考察活动的通知》精神,经我局研究,决定举荐李学兵等5位同志参加考察活动,请审核。以上意见如有不当,请批示。附件:《
最新回复
(
0
)