首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件Sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
在考生文件夹下有一个工程文件Sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小
admin
2019-03-14
56
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
结构化程序包括的基本控制结构是
在VisualBasic标准工具栏中,"菜单编辑器"的图标是
某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中:PrivateSubCommand1_Click() Open"out.txt"ForOutputAs#2 Print"Text1" Close
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
(1)在名称为Form1的窗体上添加一个名称为Com.mahd1的命令按钮(如图1所示),然后通过属性窗口设置窗体和命令按钮的属性,实现如下功能:①窗体标题为“设置按钮属性”;②命令按钮的标题为“等级考试”;③程序运行后,命令
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger m=1:n=0 DoWhilem
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
有三个关系R、S和T如下:则由关系R和S得到关系T的操作是
设循环队列为Q(1:m),其初始状态为front=rear=m。经过一系列入队与退队运算后,front=20,rear=15。现要在该循环队列中寻找最小值的元素,最坏情况下需要比较的次数为
随机试题
A.球囊B.面神经C.听小骨D.半规管E.蜗螺旋管位于鼓室内的是
“桃红和青白色的杂花在眼前还明亮,到远处就成为斑斓的烟霭了”一句运用了________________的修辞手法。
心房颤动的临床特点包括
患者,男,52岁。阵发性心悸半年,时有胸闷,登2楼觉气急3个月,下肢水肿3天来院门诊。心电图示窦性心律,心率64次/分,PR间期0.24秒伴完全性右束支传导阻滞,诊断为扩张型心肌病,心功能不全。入院后予以洋地黄、利尿药和扩血管药物治疗。第4天突然神志不清,
患者,女性,33岁。大专文化,于今日自然分娩一女婴。在产后指导哺乳的措施中,正确的做法是
两套平面坐标系,在进行四参数坐标转换时,最少需要()个公共点。
抗冻等级()以上的混凝土简称抗冻混凝土。
在空气压缩机的进出风管适当位置安装消声器的做法,属于施工噪声控制技术中的()。
居住国政府对其居民在非居住国得到税收优惠的那部分所得税,视同已纳税额而给予抵免,不再按本国税法规定补征,这属于()。
张某与海河公司于2005年3月签订合同,约定张某以40万元向海河公司购买1辆大客车,合同签订之日起1个月内支付30万元,余款在2006年12月底前付清,并约定在张某付清全款之前该车所有权仍属海河公司。张某未经其妻同意,以自家住房(婚后购买,房产证登记所有人
最新回复
(
0
)