首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
考生文件夹下有工程文件sjt5.vbp。窗体的设计界面、各控件初始属性设置及有关代码见窗体文件。 考生文件夹下in5.dat文件中保存有一篇英文文章,并有如下要求和限制: 文章中除英文单词外,还可含有英文圆括号“()”、逗号“,”、句号“.
考生文件夹下有工程文件sjt5.vbp。窗体的设计界面、各控件初始属性设置及有关代码见窗体文件。 考生文件夹下in5.dat文件中保存有一篇英文文章,并有如下要求和限制: 文章中除英文单词外,还可含有英文圆括号“()”、逗号“,”、句号“.
admin
2020-04-08
45
问题
考生文件夹下有工程文件sjt5.vbp。窗体的设计界面、各控件初始属性设置及有关代码见窗体文件。
考生文件夹下in5.dat文件中保存有一篇英文文章,并有如下要求和限制:
文章中除英文单词外,还可含有英文圆括号“()”、逗号“,”、句号“.”、连字符“一”等标点符号和空格符。
英文单词间可由一至多个空格符分隔或标点符号分隔。
(3)标点符号前后可以有零至多个空格符。
(4)连字符(一)可出现在行内两个单词间或行末,前后不允许有空格符或其他标点符号,连字符两边连接的两个单词视为一个单词。当连字符出现在行末时,表示下一行的第一个单词与本行末的单词为一个单词。
程序的功能是,当程序运行时,单击“读取并统计”按钮,则按行读取in5.dat文件的内容,并显示到文本框Textl中,同时调用函数过程CountWords统计该行出现的单词数。当文章内全部内容统计结束后,统计结果显示在文本框Text2中;单击“保存”按钮,则保存结果。
“读取并统计”和“保存”按钮的Click事件过程已经给出,请编写CountWords过程中的代码,以实现上述功能。程序运行界面示意图如图所示。
注意:考生不得修改窗体文件中已经存在的控件和程序,在结束程序运行之前,必须进行“读取并统计”,且必须单击“保存”按钮保存结果,否则无成绩。最后,程序按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,填入相应的代码以实现题目的功能。 参考答案(阴影部分是需要填入的内容) Option Base l Dim TotalWords As Integer Private Function CountWords(s As String)As Integer ′======================== 考生编写的程序================= [*] End Function Private Sub Commandl Click() Dim str As String Dim i As Integer TotalWords=0 Open App.Path&"\in5.dat"For Input As#1 Textl.Text="" Do While Not EOF(1) Line Input#1.str Textl.Text=Textl.Text&str&vbCrLf TotalWords=TotalWords+CountWords(str) Loop Text2.Text=TotalWords Close#1 End Sub Private Sub Command2 Click() Open App.Path&"\out5.dat"For Output As#l Print#1.T0talWords Close#1 End Sub 步骤3:调试并运行程序,单击“读取并统计”按钮,再单击“保存”按钮(若未点击“保存”按钮无成绩),最后关闭程序后按题目要求存盘。
解析
Line Input语句用于读取顺序文件中一行全部字符,直到遇到回车符为止,故函数Cou-ntWords()的参数为每次读取的一行字符。判断一个字符是否为英文字母,可以将该字符转换为大写,再判断该字符是否满足大于等于“A”且小于等于“Z”,若满足,则为英文字母。
转载请注明原文地址:https://kaotiyun.com/show/YNTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
结构化程序所要求的基本结构不包括()。
要使菜单项MenuOne在程序运行时失效,应使用的语句是()。
A、PrivateSubForm_Click()x=InputBox("输入界面","请输入数据",20)EndSubB、PrivateSubForm_Click()x=InputBox("请输入数据","输
设有表示学生选课的三张表,学生S(学号,姓名,性别,年龄,身份证号),课程C(课号,课名),选课SC(学号,课号,成绩),则表SC的关键字(键或码)为( )。
有人在属性窗口中通过设置Picture属性为命令按钮装入了图片,但没有显示,其原因是
以下能够设置控件焦点的方法是( )。
VisualBasic控件一般都规定一个默认属性,在引用这样的属性时,只写对象名而不必给出属性名。默认属性为Caption的控件是()。
下列可以激活属性窗口的操作是()。
编写如下程序:PrivateSubCommand1_Click()DimaAsInteger,bAsIntegera=3b=2Ifa*b<10Thenb=b+1Elseb
某系统总体结构图如下图所示:该系统总体结构图的深度是( )。
随机试题
履行出资人职责的机构依照法律、行政法规的规定,制定或者参与制定国家出资企业的()。
裁缝的劳动和木匠的劳动都是在特定形势下进行的劳动,但在市场上,裁缝生产的衣服和木匠生产的家具却可以互相交换。这是因为()。①衣服和家具都能满足人类的特定需求②衣服和家具都取材于自然③衣服和家具都包含了人类劳动④裁缝需要家具,木匠
安徽省内长江水系湖泊众多,其中()为中国五大淡水湖之一。
根据所给资料,回答下列问题。2017年,我国城镇环境基础设施建设投资额中,同比增速最高的是:
美国交通运输业正逐渐从以石油为基础过渡为采用多种替代能源,如乙醇、生物柴油、电力或氢能等。为了更加壮大这支队伍,能源部阿贡国家实验室的研究人员已经开始调查将压缩天然气(CNG)作为轻型轿车和卡车能源选择的可能性。CNG汽车是指主要由甲烷构成的天然气在25兆
按照刑法的规定,不得假释的犯罪分子包括()。
Inthispart,youareaskedtowriteanessaybasedonthefollowingchart.Inyourwriting,youshould1)interpretthechartan
企业物流活动中,______具有极强的服务性,以满足用户需求。
PASSAGEONE
A、Bythelastname.B、Bythefirstname.C、Bythemiddlename.D、Bythefullname.B题目询问美国人在公司如何相互称呼。女士问美国人之间怎么问候(greet)对方,男士说:“
最新回复
(
0
)