首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度为”和“以该长度最后一次出现的单词是”;再画两个名称分别为Text1和Te
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上有两个标题分别是“读数据”和“统计”的命令按钮。请画两个标签,其名称分别是Label1和Label2,标题分别为“最长单词的长度为”和“以该长度最后一次出现的单词是”;再画两个名称分别为Text1和Te
admin
2018-10-29
30
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
对长度为10的线性表进行冒泡排序,最坏情况下需要比较的次数为
如果在VisualBasic集成环境中没有打开属性窗口,下列可以打开属性窗口的操作是( )。
在利用菜单编辑器设计菜单时,为了把组合键"Alt+X"设置为"退出(X)"菜单项的访问键,可以将该菜单项的标题设置为( )。
可以产生30~50(含30和50)之间的随机整数的表达式是( )。
如果要将一个窗体从内存中清除,应使用的语句是
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是( )。
编写如下程序:PrivateSubCommand1_Click() DimmAsInteger,nAsInteger n=2 Form=1To3 Printproc(n); NextmEndSubF
设工程文件中包名称分别为Form1、Form2的两个窗体,且Form1的菜单属性设置如下:窗体Form1中的程序如下:DimFlagAsBooleanPrivateSubForm_Load() Flag=TrueEndSubPr
随机试题
根据国家的教育目的制定的某一级或某一类学校、某一专业对人才培养的具体的质量规格是()。
A.骨痛B.自发性骨折C.胸廓畸形或脊柱畸形D.骨髓瘤细胞浸润骨骼引起的局部肿块E.胸、肋、锁骨连接处发生串珠样结节
早期膝关节滑膜结核,除全身治疗及局部制动外,局部治疗首选
下列()会导致一国生产可能性曲线向外移动。
《峨眉山月歌》中描绘的景色属于()。
澳门特别行政区的司法机关是()。
加洛林文艺复兴始于哪位君主?()
下面不属于软件设计阶段任务的是
MemoDate:March30,2005To:JohnSmithFrom:MaryWatersSubject:NewPensionPlanPleasecontacttheHRDepartmentfordet
D此处需填入名词,为represents的宾语。从上文提及的英国人的酒吧生活和酒吧的营业时间,可知pleasure符合上下文语义,表示酒吧代表了有节制、有品味的娱乐方式。
最新回复
(
0
)