首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
admin
2020-06-30
33
问题
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小写)及其出现的次数,并按字母顺序保存到二维数组data中,统计结束后,按字母顺序将统计结果显示到列表框List1中(字母用小写表示,且不含文中未出现的字母);单击“保存”按钮,则保存结果。“读取并统计”和“保存”按钮的Click事件过程已经给出,请编写Calculate过程中的代码以实现上述功能。程序运行界面示意图如图所示。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“读取并统计”,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,填入相应的代码以实现题目的功能。 参考答案 Private Sub Calculate(s As String,d()As Vari ant) Dim eh As String Dim i As Integer For i=l To Len(s) ch=Asc(LCase(Mid(s,i,1))) lf ch>=97 And ch<=122 Then d(ch-96,1)=Chr(ch) d(ch-96,2)=d(ch一96,2)+1 End If Next i End Sub 步骤3:调试并运行程序,结果如图4.10所示,关闭程序后按题目要求存盘。 [*]
解析
Calculate过程中利用For循环逐个取出文本字符串s中的字符,然后将所有字符使用LCase函数转换为小写,小写字母的ASCII码取值范围为65到90之间,再将每个字母及其出现的次数存储到二维数组d中。
转载请注明原文地址:https://kaotiyun.com/show/eFHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
如果要在窗体上画一个标签,应在工具箱窗口中选择的图标是
下列关于顺序文件的描述中,正确的是
下列打开“代码窗口”的操作中错误的是
设有如下事件过程:PrivateSubCommand1Click()Dimaa=Array(3,5,6,3,2,6,5,3,5,4,3,9,4,5,6,3,5)x=0n=UBound(a)Fori=0Tonm=0Fori=0
下列描述中,不符合良好程序设计风格要求的是
软件生命周期可分为定义阶段、开发阶段和维护阶段,下面不属于开发阶段任务的是
在窗体画一名为CommonDialog1,则下列与CommonDialog1.ShowOpen方法等效的语句是
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为
已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分,某人编写程序如下:OptionBase1PrivateSubCommand1Click()DimsimAsInte
语句DimArr(-2To4)AsInteger所定义的数组的元素个数为
随机试题
女,24岁。产前检查发现尿糖(+),血糖7.2mmol/L,葡萄糖耐量试验减低,不伴有“三多一少”症状可能的诊断是
患者,患肺痨7年,咳嗽无力、声低懒言,痰中夹血,血色淡红,午后低热,面色咣白,颧红盗汗。舌嫩红有齿痕,苔薄白,脉细弱数。如下哪项调养是错误的
如图所示的周期为丁的三角波信号,在用傅氏级数分析周期信号时,系数a0、an和bn判断正确的是:
计算机高级语言编写的程序编译成机器语言程序后即可被计算机执行。 ( )
依据《中华人民共和国审计法》,以下哪个单位不需要审汁机关有计划地定期审计?()
2010年,吉林省全年完成全社会固定资产投资9621.77亿元,比上年增长32.5%,人均投资达到35381元。其中,城镇投资7925.72亿元,增长33.0%;农村投资1696.05亿元,增长30.4%。在城镇固定资产投资中,第一产业完成投资1
根据所给资料。回答106—110题。2011年甲省高新技术产业实现工业总产值6622.2亿元,同比增长37.4%,是2006年的4.9倍。高新技术产业总产值占全部规模以上工业总产值的比重达到21.3%,较上年提高0.4个百分点,比2006年提高4
只有在选民是道德而又明智的时候,一个民主政体才能良好地运转。以下哪项能从上述主张中合乎逻辑地推导出来?
A、GarbagefromfoodB、Oldears.C、Emptybottles.D、Bottleglass.D文中可听到:Butbottleglasscanbegroundintosandandusedtopav
Recentresearchhasclaimedthatanexcessofpositiveionsintheaircanhaveanilleffectonpeople’sphysicalorpsycholog
最新回复
(
0
)