首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
132
问题
窗体上有一个名称为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/xuFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
要删除列表框中最后一个列表项,正确的语句是( )。
下列叙述中正确的是( )。
设窗体上有1个名称为List1的列表框,程序运行时,如果选中了第3个列表项(最上面的列表项为第0个列表项),则下面不成立的是
编写如下程序:PrivateSubCommand1_Click()DimnAsInteger,tAsLongStaticsAsIntegert=1Forn=1To3t=
在VisualBasic中,不能关闭的窗口是
窗体上有一个名称为Combo1的组合框,要求在其编辑区输入文本并按回车键后,编辑区中的文本被添加到列表中。下面能实现这一功能的是( )。
有下面程序代码:PrivateSubCommand1_Click()a=Array(1,2,3,4,5,6,7,8,9,10)n=UBound(a)Fork=0ToUBound(a)
下列不属于计时器控件属性的是()。
下列不包含滚动条的控件是
对于命令按钮,下列说法中正确的是()。
随机试题
至宝丹的功用是
各种账务处理程序之间的区别在于()。
下列的说法错误的是()。
下列哪一项不属于反洗钱合规性风险的内容?()
(2018年真题)下列选项中,甲的行为构成无因管理的是()。
1898年,写《劝学篇》,宣扬“中学为体、西学为用”思想的洋务派官僚是
下列关于无线自组网的描述中,错误的是()。
线性表若采用链式存储结构时,要求内存中可用存储单元的地址______。
以下选项中可用作C程序合法实数的是
A、TheyhavesomefinancialproblemsB、Theylackanexcellententerpriseculture.C、Theydon’tmakeasmuchmoneyasbefore.D、Th
最新回复
(
0
)