2. 计算机
  3. 在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有2个标题分别是“读数据"和“统计”的命令按钮，1个名称为Text1的文本框，2个标签控件，如图3．31所示。 程序功能如下： 1)单击“读数据”按钮，则将考生文件夹下in5．dat文件

在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有2个标题分别是“读数据"和“统计”的命令按钮，1个名称为Text1的文本框，2个标签控件，如图3．31所示。 程序功能如下： 1)单击“读数据”按钮，则将考生文件夹下in5．dat文件

admin2018-09-19  48
问题 在考生文件夹下有一个工程文件sjt5．vbp，其窗体上有2个标题分别是“读数据"和“统计”的命令按钮，1个名称为Text1的文本框，2个标签控件，如图3．31所示。
    程序功能如下：
    1)单击“读数据”按钮，则将考生文件夹下in5．dat文件的内容(该文件中含有不超过800个英文单词，单词之间用1个空格隔开)显示在Text1文本框中。
1*]
    2)单击“统计”按钮，则自动统计Text1中所有5字母单词的个数，并显示在右下角的Label1标签中。
    “读数据”按钮的Click事件过程已经给出，“统计”按钮的Click事件过程不完整，函数GetWords的功能是从字符串s中分离出每个单词，依次放入数组words的数组元素中，返回值为单词的总数目。
    要求：
    1)请将程序中的注释符去掉，把?改为正确的内容；
    2)补全“统计”按钮Click事件过程中的代码，以实现上述程序功能。
    注意：考生不得修改窗体文件中已经存在的控件和程序，在结束程序运行之前，必须进行“统计”，且必须用窗体右上角的关闭按钮结束程序，否则无成绩。最后，程序按原文件名存盘。
选项
答案步骤1：打开考生文件夹中的工程文件sjt5．vbp，在代码编辑窗口中，去掉程序中的注释符“’”，将问号“?”改为正确的内容。参考代码： GetWords=m m=GetWords(17extl．Text，ch) ’----------考生编写的程序代码从这里开始 k=0 For i=1 To m If Len(ch(i))=5 Then k=k+1 End If Next i Label1．Caption=k ’-----------考生编写的程序代码到这里结束 步骤2：按键运行程序，单击各个按钮测试验证。 步骤3：按要求将文件保存至考生文件夹中。
解析 题目要求统计字符串数组里面长度等于5的字符串数量，可以使用循环变量数组，依次判断每个元素的长度是否为5，如果为5则统计变量加1，循环结束后得到统计结果，最后显示在标签里面。
    第一个“?”处是补充函数返回值，在GetWords函数中变量m在每次检测到单词后增加1，可知m保存了单词数量统计，因此函数的返回值为m；第二个“?”处是补充函数的入参，根据题目要求在这里统计文本框内容里面的单词数量。
转载请注明原文地址:https://kaotiyun.com/show/C9Fp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)