首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件Sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
在考生文件夹下有一个工程文件Sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
admin
2019-03-14
73
问题
在考生文件夹下有一个工程文件Sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小写)及其出现的次数,并按字母顺序保存到二维数组data中,统计结束后,按字母顺序将统计结果显示到列表框List1中(字母用小写表示,且不含文中未出现的字母);单击“保存”按钮,则保存结果。“读取并统计”和“保存”按钮的Click事件过程已经给出,请编写Calculate过程中的代码以实现上述功能。程序运行界面示意图如图所示。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“读取并统计”,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,填入相应的代码以实现题目的功能。 Private Sub Calculate(s As String,d()As Variant) Dim ch As String Dim i As Integer For i=1 to Len(s) ch=Asc(LCase(Mid(s,i,1))) If ch >=97 And ch <=122 Then d(ch-96,1)=Chr(ch) d(ch-96.2)=d(ch-96,2)+1 End If End Sub 步骤3:调试并运行程序,结果如图4.10所示,关闭程序后按题目要求存盘。 [*]
解析
转载请注明原文地址:https://kaotiyun.com/show/ipFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Form1的窗体上添加一个名称为Shape1的形状控件,通过设置参数使其形状为圆形;添加一个名称为Label1的标签,标题为“形状”,标签的大小能够根据标签内容的字数、大小而定;添加一个名称为Text1的文本框,文本框最多能够显示5个字符,文
编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsInteger,cAsIntegerDimnAsInteger,sAsIntegera=1
设有关系表学生S(学号,姓名,性别,年龄,身份证号),每个学生学号唯一。除属性学号外,也可以作为键的是
假定有以下函数过程:FunctionFun(SAsString)AsString Dims1AsString Fori=1ToLen(S) s1=LCase(Mid(S,i,1))+s1 Nexti
文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger) ...EndSub其中参数KeyCode的值表示的是发生此事件时(
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
设x是整型变量,与函数IIf(x>0,-x,x)有相同结果的代数式是( )。
(1)在考生文件央下有一个工程文件sjt3.vbp(相应的窗体义件名为sjt3.frm),在窗体上添加一个名称为List1的列表框和一个名称为Text1的文本框,如图1所示。编写窗体的MouseDown事件过程。程序运行后,如果用鼠标单击窗体,则从键盘上输
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为( )。
随机试题
言之有理是指导游人员说话要有依据,不能没有根据而胡乱地瞎说一通。()
大陷胸汤和十枣汤共同含有的药物是
下列哪一情况下,99mTc-热变性红细胞脾脏显影是首选方法
修复前的准备中,哪项工作最不重要左下6宜作的牙体修复设计是
投资规划应围绕着理财目标而制订,投资规划是理财规划的子规划。()
地球表面的四大圈层包括__________、__________、大气圈和生物圈。
王某与周某结婚时签订书面协议,约定婚后所得财产归各自所有。周某婚后即辞去工作在家奉养公婆,照顾小孩。王某长期在外地工作,后与李某同居,周某得知后向法院起诉要求离婚。周某的下列哪一请求不能得到法院的支持?()
假设系统为某进程分配了3个物理块,考虑页面走向为:7,0,1,2,0,3,0,4。试问采用CLOCK页面淘汰算法时缺页中断的次数为()。
某解放军少校甲经常以禁闭部属的方式冻饿、打骂士兵,造成了十分恶劣的影响。甲的行为构成()。
A、Theyrealizedsomecompaniesexploitedthemovement.B、Theydidn’tknowwhattodo.C、Theydidn’trealizesomecompaniesmade
最新回复
(
0
)