首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3-132所示。在给出的窗体文件中已经
在考生文件夹下有一个工程文件sjt3.vbp。程序的功能是通过键盘向文本框中输入大、小写字母及数字。单击“统计”按钮,分别统计输入字符串中大写字母、小写字母及数字字符的个数,并将统计结果分别显示在标签控件数组x中,如图3-132所示。在给出的窗体文件中已经
admin
2019-06-11
57
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivateSubCommand1_Click()Dims1AsString,s2AsStringOpen"c:\d4.
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
顺序文件在一次打开期间
为了使窗体的大小可以改变,必须把它的:BorderStyle属性设置为
设有如下通用过程:PublicFunctionf(xAsInteger)DimyAsIntegerx=20:y=2:f=x*yEndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:Priv
对于长度为n的线性表,在最坏情况下,下列各排序法所对应的比较次数中正确的是
在窗体上有一个名为Command1的命令按钮,并有如下事件过程:PrivateSubCommand1_Click()aS="SwallowsModGenulled"b$=Right(aS,8):c$=Mid(aS,1.
VB中,若没有显式声明变量的数据类型,则默认的类型是
设有如下关系表:则下列操作中正确的是
已知列表框控件List1中已放入若干表项,下列关于List1的叙述中错误的是
随机试题
血涂片瑞氏染色时,缓冲液常用的pH为
患者,男,47岁。眩晕欲仆,耳鸣,头痛且胀,每因烦劳或恼怒头晕加剧,面红,急躁易怒;舌红苔薄,脉弦。临床上用药为
患者,女性,37岁。交通事故中右下肢受伤3小时。查体:右下肢缩短,右髋关节呈屈曲、内收、内旋畸形,右足背麻木,背屈无力。该患者最可能的诊断是
中国证券业协会( )。
某铁路运输企业,2019年固定成本为2000万元,可变成本为86500万元,完成总换算周转量为9465百万吨公里。平均总成本为()元/吨公里。
家庭承包经营制并未改变农村土地的集体所有制性质,只是改变了农村土地的()。
青年期自我意识修正的主要依据有()。
讲授法意味着灌输式教学。()
梯形如图所示,中位线MN=6,则梯形的面积是(1)BC=8(2)∠C=60°
InthedaysbeforeDianabecameaccustomedtodailyhairdressers,highfashionandexpertlyappliedmakeup,shelookedherbest
最新回复
(
0
)