首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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-09-19
74
问题
窗体上有一个名称为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://jikaoti.com/ti/Y8m0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下事件过程:PrivateSubCommand1_Click() Dima a=Array(12,3,8,5,10,3,5,9,2,4) Fork=1To9 Printfun(a(k-1),a(
设有如下事件过程:PrivateSubForm_Click()Dimf1AsInteger,f2AsInteger,iAsIntegerDimsAsIntegerf1=1:f2=1s=f1
有如下程序代码:PrivateSubForm_Click()Dima(10)AsInteger,b(5)AsIntegerFori=1To10a(i)=iNexti
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是( )。
有如下过程代码:Subvar_dim() StaticnumaAsInteger DimnumbAsInteger numa=numa+2 numb=numb+1 printnuma;numbEndSub连续3次
以下叙述中正确的是( )。
以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是
下列说法中错误的是
在关系数据库中,用来表示实体间联系的是
有如下数据定义语句:DimX,YAsInteger以上语句表明( )。
随机试题
女性,28岁,产后一个月,血压高,晨起床叠被后觉鼻痒打喷嚏,继之胸闷,呼吸不畅,去附近门诊就医,体检,双肺有散在哮鸣音,心率110次/分。既往幼年有气喘发作史。经急诊处理后,症状有所缓解,呼吸28次/分,心率110次/分,双肺体征如前,病情重而住院,根
保和丸和健脾丸中相同的药是
一般存款账户主要用于办理( )的资金收付。
下列各项,应通过“固定资产清理”科目核算的有()。
UKhouseholdsarecuttingbackonspendingatthefastestratesince1980.Thisis【C1】______totheworsteconomicslowdowninth
某人驾驶一辆小轿车要做32000千米的长途旅行,除了车上装着四只轮胎,只带了一只备用胎。为了使五只轮胎磨损程度相同,司机有规律地把五只轮胎轮换使用。到达终点时,每只轮胎行驶了多少千米?
网络欺凌是一种在网上生活中发生的欺凌事件。指人们利用互联网做出针对个人或群体的恶意、重复、敌意的伤害行为,使他人受到伤害。下列中属于网络欺凌现象的有:
公文的行文关系包括()。
“文化大革命”发生的原因是
Videogameshavebecomeincreasinglyrealistic,especiallythoseinvolvingarmedcombat.America’sarmedforceshaveevenused
最新回复
(
0
)