首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt
admin
2019-05-14
34
问题
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt中读取文本,并显示在文本框Text1中,如图3-92所示。单击“统计”按钮,则统计Text1中字母R、T、D(不区分大小写)出现的次数,统计结果分别保存在窗体变量intR、intT、intD中,同时显示在文本框Text2中(显示格式不限)。单击“保存”按钮,可将intR、intT、intD中的数据保存到考生文件夹下out5.txt文件中。
要求:
1)去掉“显示”按钮事件过程中的注释,把程序中的?改为能实现上述要求的正确内容。
2)编写统计字母R、T、D出现次数的事件过程。
3)不要改动各控件的属性设置和程序的其他部分。最后把修改后的文件用原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjt5.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。参考代码: Line Input #1,str1 Text1.Text=str1 步骤2:按指定位置编写“统计”按钮的单击事件过程。参考代码: Private Sub Command2_Click( ) Dim i As Integer intR=0:intT=0:intD=0 For i=1 To Len(Str1) If Mid(str1,i,1)="R"Or Mid (Str1,i,1)="r"Then intR=intR+1 End If If Mid(str1,i,1)="T"Or Mid _(str1,i,1)="t"Then intT=intT+1 End If If Mid(strl,i,1)="D"Or Mid (Str1,i,1)="d"Then intD=intD+1 End If Next Text2.Text=intR&" "&intT&" _"&intD End Sub 步骤3:按<F5>键运行程序,先单击“显示”按钮,接着单击“统计”按钮,最后单击“保存”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/THUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
(1)在名称为Forml的窗体上画一个名称为lblPwd的标签,标题为“密令”;画两个文本框,名称分别为txtPwd、txtObi,都没有初始内容;再画三个命令按钮,名称分别为cmdShow、cmdide、cmdCopy,标题分别为“显示”、“隐藏”、“复
在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vb
设有如下事件过程:PrivateSubForm_Click()x=0Whilex10x=x+1x=x*xWendPrintxEndSub运行程序,单击窗体,输出结果是
下列过程定义正确的是()。
VisualBasic6.0不支持的图形文件是()。
在考生文件夹下有一个工程文件sjt3.vbp,在Form1的窗体中有一个文本框、一个计时器和两个命令按钮。程序的功能是在运行时,单击“开始计数”按钮,就开始计数(如图所示),每隔1秒,文本框中的数加1;单击“停止计数”按钮,则停止计数。要求:修改适当的控件
为了删除列表框中的一个列表项,应使用的列表框方法是
以下不能设置Picture属性的控件是
下面控件中,没有Caption属性的是
要使标签中的文本靠右显示,应将其Aligraent属性设置为
随机试题
A.HaveyouplannedtoanothercityB.WhatareyoudoingC.WhenwouldyoubeleavingD.WherehaveyoubeenE.Wouldyoubein
患者男性,36岁,诊断肠梗阻入院,遵医嘱插入鼻胃管。插管前,护士给患者解释插管的目的是
某患者,36岁,近几天感到外阴瘙痒,白带增多,呈稀薄状且有腥臭味,应建议她到医院做什么检查
某省检察机关请求其他省检察机关提供调查对象情况,是一种()。
下列说法中不符合弗洛伊德关于人格结构的表述的是()。
如何理解和实现社会主义市场经济条件下收入分配中的公平?
下列关于中央银行的银行职能说法不正确的是()
[A]Communication[B]Identity[C]Loss[D]Practicalities[E]Rehearsing[F]SolutionsandPrevention
Thebookwas(sobored)thatI(returnedit)(tothelibrary)(withoutfinishingit).
Theoldpaintingwasdamagedinthefloodandhadtobepainstakingly______.
最新回复
(
0
)