首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
注意:下面出现的“考生文件夹”均为%IJSER%。 在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调
注意:下面出现的“考生文件夹”均为%IJSER%。 在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调
admin
2017-12-14
31
问题
注意:下面出现的“考生文件夹”均为%IJSER%。
在考生文件夹下有一个工程文件sjt5.vbp,考生文件夹下in5.dat文件中保存有一篇英文短文。程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Text1中,同时调用Calculate过程统计每个英文字母(不区分大小写)及其出现的次数,并按字母顺序保存到二维数组data中,统计结束后,按字母顺序将统计结果显示到列表框Listl中(字母用小写表示,且不含文中未出现的字母);单击“保存”按钮,则保存结果。“读取并统计”和“保存”按钮的Click事件过程已经给出,请编写Calculate过程中的代码以实现上述功能。程序运行界面示意图如图所示。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“读取并统计”,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
calculate过程中利用For循环逐个取出文本字符串s中的字符,然后将所有字符使用Lcase函数转换为小写,小写字母的AsCll码取值范围为65到90之间,再将每个字母及其出现的次数存储到二维数组d中。 【操作步骤】 步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,填入相应的代码以实现题目的功能。 参考答案(阴影部分是需考生填入的内容) Private sub Calculate(8 As String,d() As Variant) Dim ch As String Dim ch 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:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/ygGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(5)AsStringFori=1T05a(i)=Chr(Asc("A"
设窗体上有1个垂直滚动条,已经通过属性窗口把它的Max属性设置为1,Min属性设置为100。下面叙述中正确的是()。
将一般窗体转换为MDI窗体的子窗体时要把MDIChild属性的值设置为【】。
记时器控件能有规律的以一定时间间隔触发【】事件,并执行该事件过程中的程序代码。
VisualBasic应用程序中标准模块文件的扩展名是【】。
软件设计中,有利于提高模块独立性的一个准则是
软件开发的结构化生命周期方法将软件生命周期划分成______。
下列叙述中正确的是
下列叙述中正确的是
随机试题
中国某大学张教授。2011年7~12月份除了从所在大学取得工资薪金收入外.还取得以下几项收入:(1)7月份受邀到某企业作演讲,主办方支付报酬5000元。(2)9月份有两篇论文在相关专业期刊上发表,分别取得稿酬3200元和4500元。(3)10月份,将
绛舌可见于
如果地面气象观测站与项目的距离超过()km,并且地面站与评价范围的地理特征不一致,还需要进行补充地面气象观测。
总分类账一般采用( )。
一般资料:求助者,女性,28岁,无业。案例介绍:求助者由于孩子的问题前来咨询。下面是心理咨询师与求助者之间的一段对话:求助者:“我儿子今年4岁,他胆子太小,到现在还不敢一个人去卫生间。我试着改他这个毛病,曾和孩子约定,他每次自
劳动合同管理制度的内容包括()。(2008年5月三级真题)
作为一名新时代教师,应该怎样才能上好一堂课?
对于一个堆栈、若其入栈序列为1,2,3,……,n,不同的出入栈操作将产生不同的出栈序列。其出栈序列的个数正好等于结点个数为n的二叉树的个数,且与不同形态的二叉树一一对应。请简要叙述一种从堆栈输入(固定为1,2,3,……,n)/输出序列对应一种二叉树形态的方
Aresomepeoplebornclever,andothersbornstupid?Orisintelligencedevelopedbyourenvironmentandourexperience?Strange
Ihadto______myselffromtellingherwhatIthoughtofher.
最新回复
(
0
)