首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3-132所示。在给出的窗体文件中已经
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3-132所示。在给出的窗体文件中已经
admin
2019-06-11
34
问题
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3-132所示。在给出的窗体文件中已经添加了全部控件,但程序不完整。
要求:去掉程序中的注释符,把程序中的?改为正确的内容。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
审题分析 本题源程序在For循环体中(其中循环终值应为文本框的字符长度,即n=Len(Text1.Text)),用Mid函数逐一取出文本框中的每个字符,并用Asc函数返回其ASCII码。若取出字符的ASCII码在48~57之间,则记录数字个数的数组变量a(0)增1;若ASCII码在65~90之间,则记录大写字母个数的数组变量a(1)增1;若ASCII码在97~122之间,则记录小写字母个数的数组变量a(2)增1。 操作步骤 步骤1:打开考生文件夹中的本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: n=Len(Text1.Text) b=Asc(Mid(s,i,1)) Select Case b For i=0 To 2 x(i)=a(i) 步骤2:按要求将文件保存至考生文件夹中。 考点链接 数组定义与操作、常用内部函数、多分支结构。
解析
转载请注明原文地址:https://kaotiyun.com/show/t8Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
在关系数据库中,用来表示实体间联系的是
为了对多个控件执行操作,必须选中这些控件。下列不能选中多个控件的操作是
有下面程序代码:PrivateSubCommand1_Click()DimaAsStringa="COMPUTER"n=search(a,"T"):PrintIIf(n=0,"未找到",n)EndSubPrivateFunctio
下列符号常量的声明中不合法的是
在窗体上画一文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应使用的语句为
语句PrintSgn(-6^2)+Abs(-6^2)+Int(-6^2)的输出结果是()。
下面的程序执行完毕后,组合框中数据项的值是()。PrivateSubFoma_Click()Fori=1To6Combo1.AddltemiNextiFori=lTo3
在表达式2+3*4^5一Sin(x+1)/2中,首先进行的运算是()。
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
随机试题
TheNorwegianNobelCommitteehasdecidedto【21】theNobelPeacePrizefor1998toJohnHumeandDavidTrimblefortheirefforts
使用增感屏可使
女性,12岁,急性右上腹痛5天入院,腹痛为钻顶样,间断发作;查体:T36.5℃,右上腹深压痛,无肌紧张、反跳痛。应考虑为
火灾报警控制器发出故障报警,通信故障灯亮,打印机打印通信故障、时间,不可能的故障原因是()。
下列说法错误的是()。
伟大的领袖人物是历史的创造者。()
关于我国战国七雄地理位置描述准确的是()。
在磁盘的某一工作时刻中( )。
Theworldisverydifferentnow.Formanholdsinhismortalhandsthepowertoabolishallformsofhumanpovertyandallforms
A.forB.onC.stressD.profitsE.madeF.connectionG.takeH.indicatingI.benefitsJ.sufficientK.efficientL.habitsM
最新回复
(
0
)