首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度为”和“以该长度最后一次出现的单词是”;再画两个名称分别为Text1和Te
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度为”和“以该长度最后一次出现的单词是”;再画两个名称分别为Text1和Te
admin
2018-10-29
83
问题
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度为”和“以该长度最后一次出现的单词是”;再画两个名称分别为Text1和Text2,初始值为空的文本框,如图1-73所示。程序功能如下:
①如果单击“读数据”按钮,则将考生文件夹下in5.dat 文件的内容读到变量s 中(此过程已给出);
②如果单击“统计”按钮,则自动统计in5.dat文件(该文件中仅含有字母和空格,而空格是用来分隔不同单词的)中最长单词的长度,以及in5.dat中最后一个以该长度出现的单词,并将该单词的长度显示在Text1文本框内,将该单词显示在Text2文本框内。
“读数据”命令按钮的Click事件过程已经给出,请为“统计”命令按钮编写适当的事件过程,实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行统计,且必须通过单击窗体右上角的关闭按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt5.vbp,如表2-16所列在窗体上画出控件并设置它们的相关属性。 [*] 步骤2:打开代码编辑窗口,在指定位置编写“统计”按钮的单击事件过程。 参考代码: Private Sub Command2_Click() ’需考生编写 n = Len(s): t = "" Dim Max_len As Integer For i = 1 To n c = Mid(s, i, 1) If c <> " " Then t = t + c Else If Len(t) > Max_len Then Max_len = Len(t) Max_word = t End If t = "" End If Next i If Len(t) > Max_len Then Max_len = Len(t) Max_word = t End If Text1.Text = Max_len Text2.Text = Max_word End Sub 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按<F5>键运行程序,先单击“读数据”按钮,再单击“统计”按钮,最后单击窗体右上角的关闭按钮结束程序。
解析
转载请注明原文地址:https://kaotiyun.com/show/83Fp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
求1!+2!+……+10!的程序如下:PrivateFunctions(xAsInteger) f=1 Fori=1Toxf=f*i Next s=fEndFunctionPrivateSubCommand1
在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的
假定在图片框Picture1中装入了一个图片,在程序运行中,为了清除该图片(注意,清除图片,而不是删除图片框),应采用的正确方法是( )。
在利用菜单编辑器设计菜单时,为了把组合键"Alt+X"设置为"退出(X)"菜单项的访问键,可以将该菜单项的标题设置为( )。
在窗体上画一个命令按钮,然后编写如下程序:OptionBase1PrivateSubCommand1_Click()DimArr(10)AsIntegerFori=1To10Arr(i)=
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
设有如下事件过程:PrivateSubForm_Click() Sum=0 Fork=1To3 Ifk
窗体上有名称为Command1的命令按钮,名称分别为Label1、Label2、Label3的标签。编写如下程序:PrivatexAsIntegerPrivateSubCommand1_Click() StaticyAsIntege
随机试题
管路交叉时,一般将上面(或前面)的管路断开,也可将下方(或后方)的管路画上断裂符号断开。()
妊娠初期,恶心呕吐,呕吐清涎,口淡无味,神疲思睡,舌淡,苔白润,脉缓滑无力,治疗首选方剂是:
在我国,招标投标法规定的最低竞争数是()。
根据《水利水电工程标准施工招标文件》,经评审的最低投标价法中,对于投标报价正确的是()。
下列可以作为约定购回式证券交易的交易时间为()。I.9:40Ⅱ.11:30Ⅲ.14:00Ⅳ.15:30
根据《物权法》的规定,下列关于各类权利设立的说法中,错误的有()。
甲公司为一家从事机械制造的增值税一般纳税人,2011年度发生如下经济业务:(1)经批准,甲公司接受乙公司投入不需要安装的设备一台并交付使用,合同约定的价值为3500万元(与公允价值相符)。增值税税额为595万元;同时甲公司增加实收资本2000万元,相
Foodisveryimportant.Everyoneneedsto【C1】______wellifheorshewantstohaveastrongbody.Ourmindsalsoneedakindof
假设有一个学生班长关系:学号姓名班长0701张英07020702李力07020801张强08060806张非0806
We(go)______outiftheweatherhadn’tbeensobad.
最新回复
(
0
)