首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt
admin
2019-05-14
38
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。(1)在名称为Fomal的窗体上建立一个如下表所示的下拉菜单,其中“设置”菜单项为灰色(不可用),如图3-58所示。注意:存盘时必须存放在考生文件夹下,工程文件名为sjt1
下列程序段中没有错误的是()。
下列关于文件的叙述中错误的是()。
下列关于工程的叙述中错误的是()。
在名称为Form1的窗体上添加一个名称为Image1的图像框,有边框,并可以自动调整装入图片的大小以适应图像框的尺寸;再添加三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“红桃”、“黑桃”、“清除”。在考生文件夹下
假定计时器控件Timerl的Enabled属性为True,Interval属性为1000,并编写如下程序代码:PrirateSubTimer1_Timer()DimxAsIntegerFori=1To100x=x+1Nexti
对于某些控件,只要将其Style属性设置为1,则可以在该控件上使用Picture属性显示图片。以下不具备这一使用规则的控件是
现有程序如下:OptionBase1PrivateSubForm_Click()Dimx(5,6)AsInteger,y(5)AsIntegerFori=1To5Forj=1To6x(i,j)=Int(Rnd*9+1)
设有如下事件过程:PrivateSubCommand1_Click()Fori=1To5j=iDoPrint"*"j=j-1LoopUntilj=0NextiEndSub运行程序,输出“*”的个数是
考生文件夹下有一个工程文件sjt3.vbp。程序的功能是:通过键盘向文本框中输入数字,如果输入的是非数字字符,则提示输入错误,且文本框中不显示输入的字符。单击名称为Command1、标题为“添加”的命令按钮,则将文本框中的数字添加到名称为Combo1的组合
随机试题
简述法约尔对管理理论的贡献。
以下对性能优化工具的功能描述不正确的是
"医书多分头痛、头风为二门,然一病也,但有新久去留之分耳。浅而近者名头痛,其痛卒然而至,易于解散速安也;深而远者为头风,其痛作止不常,愈后遇触复发也。皆当验其邪所从来而治之"。这段话出自下列哪本书:
滤过分数是指
在国际贸易中,争议产生的原因主要有()。
上市公司( )应当就重大资产重组是否构成关联交易作出明确判断,并作为决议事项予以披露。
下列行为中,属于不正当竞争的是()。
5,5,14,38,87,( )
下面程序的输出结果是【】。charb[]="ABCD";main(){charb[30];strcpy(&b[0],"GH");strcpy(&b[1],"GH");
A.markingB.sinceC.nuisanceD.arriveE.profoundF.signsG.explosionH.worry
最新回复
(
0
)