首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
admin
2016-08-24
56
问题
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小写)及其出现的次数,并按字母顺序保存到二维数组data中,统计结束后,按字母顺序将统计结果显示到列表框List1中(字母用小写表示,且不含文中未出现的字母);单击“保存”按钮,则保存结果。“读取并统计”和“保存”按钮的Click事件过程已经给出,请编写Calculate过程中的代码以实现上述功能。程序运行界面示意图如图所示。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“读取并统计”,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,填入相应的代码以实现题目的功能。 参考答案 Private Sub Calculate(s As String,d()As Variant) End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
Calculate过程中利用For循环逐个取出文本字符串s中的字符,然后将所有字符使用LCase函数转换为小写,小写字母的ASCII码取值范围为65到90之间,再将每个字母及其出现的次数存储到二维数组d中。
转载请注明原文地址:https://kaotiyun.com/show/i4Lp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了避免流程图在描述程序逻辑时的灵活性,Nassi和Shneiderman提出了用方框图来代替传统的程序流程图,通常也把这种图称为
软件危机出现于20世纪60年代末,为了解决软件危机,人们提出了______的原理来设计软件,这就是软件工程诞生的基础。
窗体文件中的信息是()和其他信息。
下面4个语句中,能打印显示20*30字样的是()
如果在C盘当前文件夹下已存在名称为studata.dat的顺序文件,那么执行语句Open"c:studata.dat"ForAppendAs#1之后,将()。
有如下函数过程:FunctionFun(ByValxAsIngeger,ByValyAsInteger)AsInteger DoWhile…Y<>0 reminder=xModY x=y
表达式Right("Beijing",4)的值是
以下关于窗体的叙述中,错误的是
在E-R图中,用来表示实体的图形是()
随机试题
若成人出现了黑粪,提示其每天消化道出血量至少为
样板按其用途可分为哪几类?
劳动争议
揭开雅典政治改革序幕的是()
施工总承包单位与分包单位依法签订了“幕墙工程分包协议”,在建设单位组织竣工验收时发现幕墙工程质量不合格。下列表述正确的是( )。
税盾效应
在法庭的被告中,被指控偷盗、抢劫的定罪率要远高于被指控贪污、受贿的定罪率。其重要原因是后者能聘请收费昂贵的私人律师,而前者主要由法庭指定的律师辩护。以下哪项如果为真,最能支持题干的叙述?
“文化大革命”发生的原因有
Withunfamiliarhumanbeings,whenweacknowledgetheirhumanness,wemustavoidstaringatthem,andyetwemustalsoavoidign
Heisfearless,altruistic,steel-willed,hospitable,unbelievablyhardy,unpretentiousandwarm—andhehaslostnoneoftheseq
最新回复
(
0
)