首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
51
问题
窗体上有一个名称为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/awm0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypex aAsInteger bAsIntegerEndTypePrivateSubCommand1_Cli
以下选项中,不合法的VisualBasic的变量名是( )。
编写如下程序:PrivateSubCommand1_Click()DimnAsInteger,tAsLongStaticsAsIntegert=1Forn=1To3t=
下列关于水平滚动条的叙述中,错误的是
下面关于标准模块的叙述中错误的是( )。
结构化程序设计的基本原则不包括( )。
窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.En
下面关于控件数组的叙述中正确的是
假定Picture1和Text1分别为图片框和文本框的名称,则下列错误的语句是( )。
随机试题
冷换设备投用前的检查内容有哪些?
女,36岁。无明显诱因夜间排黑便3次,伴口渴、一时性眩晕来院。既往无溃疡病、肝炎病史。查体:HR100次/分,BP90/60mmHg,烦躁,皮肤苍白。辅助检查不宜选择
冷疗减轻疼痛的机理是
某鞣酸栓,每粒含鞣酸0.2g,空白栓重2g,已知鞣酸的DV=1.6,则每粒鞣酸栓所需可可豆脂为
关于政府补助的会计处理,下列说法中正确的有()。
下列古猿化石属于攀树的古猿化石代表的是()。
下列赋税改革中,属于齐国的是()。
She______thetemptationtobuyacoatshecouldnotafford.
Choosethecorrectletter,A,BorC.Whatfactorofthepool’sGrandOpeningremainsundecided?
Whoarethedonorsforthedesignsusedinthecards?_________fromallovertheworld.Howmucharecardsinpacksof10?
最新回复
(
0
)