首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程义件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请添加两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度”和“以该长度最后一次出现的单词是”;再添加两个名称分别为Text1和T
在考生文件夹下有一个工程义件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请添加两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度”和“以该长度最后一次出现的单词是”;再添加两个名称分别为Text1和T
admin
2015-10-23
43
问题
在考生文件夹下有一个工程义件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请添加两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度”和“以该长度最后一次出现的单词是”;再添加两个名称分别为Text1和Text2,初始内容为空的文本框,如图所示。程序功能如下:
①如果单击“读数据”按钮,则将考牛文件夹下inS.dat文件的内容读到变最s中(此过程已给出)。
②如果单击“统计”按钮,则程序自动统计inS.dat文件(该文件中仅含有字母和空格,而空格是用来分隔不同单词的)中最长单词的长度,以及ins.dat中最后一个以该长度出现的单词,并将该单词的长度显示在Text1文本框内,其单词显示在Text2文本框内。
“读数据”命令按钮的Click事件过程已经给出,请为“统计”命令按钮编写适当的事件过程,实现上述功能。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之的,必须进行统计,日必须通过单击窗体右上角的“关闭”按钮结束程序,否则无成绩。最后,程序按原文件名存盘。
选项
答案
步骤1:打开本题工程文件,添加两个名称分别是Latbel1和Labe12,标题分别为“最长单词的长度”和“以该长度最后一次出现的单词是”的标签;再添加两个名称分别为Text1和Text2。初始值都为空的文本框。 步骤2:打开代码编辑窗口,在代码编辑窗口指定位置编写以下代码。 For i=1 To Len(S) J=Asc(Mid(S,i,1))’依次从S中取一个字符转换成ASCII码 Select Case J’判断J的范围 Case 48 To 57,65 To 90,97 To 122 Case Else。’当J不在上述范围,则使之为"一" Mid(S,i,1)="一" End Select Next i J=Len(S)-1 For i=1 TO J If Mid(s,i,1)="一"And Mid(s,i+1,1)="一"Then S=Left(S,i)+Right(S,J—i) J=J一1 i=i-1 End If Next i S=Left(S,Len(S)-1) R=Split(s,"-")将S以"-"分隔成多个单词并存入R中 B=R(0) For i=1 To UBound(R)’查找最长的单词 If Len(B)
解析
单击“统计”按钮,通过Select Case语句判断是否为空格或是字母,通过Len()函数得出中最长单词的长度,并通过比较把最长单词赋值给变量B,运用For语句从字符串s的最后开始查找,判断Len(B)=Len(R(m)),找出最后一个以该长度出现的单词,并将该单词的长度显示在Text1文本框内,将该单词显示在Text2文本框内。
转载请注明原文地址:https://kaotiyun.com/show/0JLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面程序的功能是找出给定的10个数中最大的一个数,最后输出这个数以及它在原来10个数中的位置。请在下划线处填入适当的内容,将程序补充完整。OptionBase1PrivateSubForm_Cfick()DimX
假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项失效(变灰),应使用的语句为()。
设有如下程序:PrivateSubForm_Click()DimaAsInteger,sAsIntegern=8:s=0Dos=s+n:n=n-1LoopWhilen>0P
设用复制、粘贴的方法建立了一个命令按钮数组Commandl,以下对该数组的说法错误的是
以下关系表达式中,其值为假的是
以下合法的变量名是
设有语句:Open"d:\Test.txt"ForOutputAs#1,以下叙述中错误的是()。
两个或两个以上模块之间联系的紧密程度称为()。
用树形结构表示实体之间联系的模型是()。
一名学生只能住一间宿舍,一间宿舍可住多名学生,则实体“宿舍”与实体“学生”的联系属于______________的联系。
随机试题
SunSing造纸公司已经成立多年,其厂址处在镇郊。这些年该城镇已经发展成为一个城市。SunSing造纸公司仍然在原来的经营地点,也就是如今接近市中心的地方。卡车将废纸运送到工厂中去,在工厂中将其加工成优质纸,而后再运送到各个地区去。许多人抱怨说该工厂
肺表面活性物质
下列选项对上市公司的要约收购描述正确的是( )。
小学教育是学校教育制度的起始阶段。()
某可乐品牌开展促销活动,买三瓶可乐可凭空瓶免费获得一瓶。小王与同学们买了19瓶该品牌可乐,完成兑换后,恰巧每位同学喝了一瓶可乐,那么小王有多少位同学?
达尔文的进化论说,竞争就是相同群体或不同群体相互抢夺有限资源。有人说人类也是如此。你对此有什么看法?
以下不构成无限循环的语句或语句组是
IntheyearsafterWorldWarII,Americanstypicallyassumedthefullresponsibilitiesofadulthoodbytheirlateteensorearly
ApplicationsoutsidetheEarth’satmosphereareclearlyagoodfitforrobots.Itisdangerousforhumanstogettospace,to
Whatdoesthepencilcountingexperimentsuggest?
最新回复
(
0
)