首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Label1 和 Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Text1和Text2、初
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Label1 和 Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Text1和Text2、初
admin
2018-10-29
53
问题
在考生文件夹下有一个工程文件sjt5.vbp,窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,名称分别为Label1 和 Label2,标题分别为“出现次数最多的字母是”和“它出现的次数为”;再画两个名称分别为Text1和Text2、初始值为空的文本框,如图1-30所示。
程序功能如下:
①单击“读数据”按钮,则将考生文件夹下in5.dat文件的内容读到变量s 中(此过程已给出);
②单击“统计”按钮,则自动统计in5.dat 文件中所含各字母(不区分大小写)出现的次数,并将出现次数最多的字母显示在Text1 文本框内,它所出现的次数显示在Text2 文本框内。
“读数据”按钮的Click事件过程已经给出,请为“统计”按钮编写适当的事件过程以实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行统计,且必须用窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的工程文件sjt5.vbp,按要求画出控件并设置属性。 步骤2:在代码编辑窗口的指定位置,编写“统计”按钮的单击事件过程。 参考代码: Private Sub Command2_Click() ’ 考生编写 Dim a(26) As Integer n = Len(s) For i = 1 To n c = UCase(Mid(s, i, 1)) If c >= "A" And c <= "Z" Then j = Asc(c) - Asc("A") + 1 a(j) = a(j) + 1 End If Next i Max = a(1) t = Chr(Asc("A")) For i = 2 To 26 If a(i) > Max Then Max = a(i) t = Chr(Asc("A") + i - 1) End If Next i Text1.Text = t Text2.Text = Max End Sub 步骤3:按
键运行程序,先单击“读数据”按钮,接着单击“统计”按钮,然后单击窗体右上角的关闭按钮结束程序。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/73Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
顺序文件在一次打开期间( )。
如果一个菜单项的Enabled属性被设置为False,则程序运行时,该菜单项( )。
在面向对象的程序设计中,可被对象识别的动作称为( )。
阅读程序:OptionBase1SubP(b()AsInteger)Fori=1To4b(i)=2*iNextiEndSubPrivateSubForm_Click()
窗体如图1所示。要求程序运行时,在文本框Text1中输入一个姓氏,单击"删除"按钮(名称为Command1),则可删除列表框List1中所有该姓氏的项目。若编写以下程序来实现此功能:PrivateSubCommand1_Click() Dimn%
下面不是键盘事件的是( )。
如果把命令按钮的Cancel属性设置为True,则程序运行后( )。
随机试题
“就改进工作的几点意见”属于()短语。
在下列各项中,反映企业经营成果的会计要素有()。
汇发贸易公司于2007年7月4日进口一批货物,海关于当日开出税款缴纳证,交企业纳税。其中关税税款为人民币24000元,增值税税款为人民币35100元,消费税税款为人民币8900元。该公司于1月27日交回税款缴纳证。经核查,实际缴款日期为1月25日。该公司应
2006年5月,甲、乙、丙、丁、戊5家公司出资组建A有限责任公司,注册资本2000万元。其中,甲以货币出资500万元,乙以厂房作价出资600万元,丙以技术作价出资400万元;丁以设备作价出资200万元,戊以商标作价出资300万元。公司成立后,发现股东丁的设
态度的核心成分是()。
急性心肌梗死时最早、最突出的症状是()。
技术只是一个载体,人类经过长期努力要解决的仍然是对自身的关怀问题。人与技术的关系不是静止、固定不变的,现代人受到自身所发明的工具技术的侵蚀而逐渐丧失的人之求知本性,也许还是需要通过技术的发展来找回它们。“个人制造”会在人与技术的关系上带来让人们惊喜的巨变。
PresidentBarackObamaclaimedprogressWednesdayinhissecond-termdrivetocombatclimatechangebutsaidmoremustbedonet
当前,很多采用的需求定义方法是一种()或者称为预先定义的方法。
待排序的关键码序列为(15,20,9,30,67,65,45,90),要按关键码值递增的顺序排序,采取简单选择排序法,第一趟排序后关键码15被放到第()个位置。
最新回复
(
0
)