首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10) As Int
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。要求编写一个程序,统计文本框中0-9各数字字符的个数。某人编写如下程序: Private Sub Command1_Click() Dim count(10) As Int
admin
2018-12-20
49
问题
窗体上有一个名称为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
解析
根据题意可知,第2个For循环应该是统计的字符个数。i是循环变量,所以选D)。
转载请注明原文地址:https://kaotiyun.com/show/jkFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是( )。
下列数据结构中,属于非线性结构的是( )。
在窗体上画一个命令按钮(名称为Command1),并编写如下代码:FunctionFun1(ByValaAsInteger,bAsInteger)AsInteger DimtAsInteger t=a-b b=t+a
运行如下程序PrivateSubCommand1_Click() Dima(5,5)AsInteger Fori=1To5 Forj=1To4 a(i,j)=i*2+j Ifa(i,
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
下列叙述中正确的是( )。
以下关于多重窗体程序的叙述中,错误的是( )。
在E-R图中,用来表示实体的图形是
随机试题
饭后嗜睡,神疲倦怠,食少纳呆者为
超声显示子宫腔内双层蜕膜囊(双蜕膜征),提示
下列应密闭保存的药物
下列病人不可给予鼻饲饮食的是
法定盈余公积金弥补亏损和转增资本金后的剩余部分不得低于注册资本的()。
甲公司为一家大型国有企业集团公司,2016年度和2017年度,甲公司发生的相关业务如下:(1)2016年3月31日,甲公司与境外A公司的某股东签订股权收购协议,甲公司以110000万元的价格收购A公司股份的80%。6月30日,甲公司支付了收购款并完成股权
尚未更正的错报汇总数构成包括()。
中国历史上第一部民法典是()。
A、Menspendmorenightsintheirfriends’homethanwomen.B、Womenaremuchmoretalkativethanmen.C、Womenenjoymoreandbette
Forcenturies,inthecountriesofsouthandSoutheastAsiatheelephanthasbeenanintimatepartoftheculture,economyandr
最新回复
(
0
)