首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件in5.txt中
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件in5.txt中
admin
2018-12-20
19
问题
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件in5.txt中读取文本,并显示在文本框Text1中,如图2.10所示。单击“统计”按钮,则统计Text1中字母R、T、D(不区分大小写)出现的次数,统计结果分别保存在窗体变量intR、intT、intD中,同时显示在文本框Text2中(显示格式不限)。单击“保存”按钮,可将intR、intT、intD中的数据保存到考生文件夹下out5.txt文件中。
要求:
1)去掉“显示”按钮事件过程中的注释,把程序中的?改为能实现上述要求的正确内容。
2)编写统计字母R、T、D出现次数的事件过程。
3)不要改动各控件的属性设置和程序的其他部分。最后把修改后的文件用原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的本题工程文件sjts.vbp,在代码编辑窗口,去掉程序中的注释符“*’,将问号“?”改为正确的内容。 参考代码: Line Input#1,strl Textl.Text=strl 步骤2:按指定位置编写“统计”按钮的单击事件过程。 参考代码: Private Sub Command2一Click() Dim i As Integer intR=0:intT=0:intD=0 For i=i To Len(Strl) If Mid(strl,i,1)=”R”Or Mid (Strl,i,1)=”r”Then intR=intR+1 End If If Mid(Strl,i,1)=”T”Or Mid (Strl,i,1)=”t”Then intT=intT+1 End If If Mid(Strl,i,1)=”D”Or Mid (strl,i,1)=”d”Then intD=intD+1 End If Next Text2.Text:intR&””&intT&” ”&intD End Sub 步骤3:按
键运行程序,先单击“显示”按钮,接着单击“统计”按钮,最后单击“保存”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/nkFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有1个Timerl计时器,1个Shape1形状控件,还有下面程序代码:DimflagAsBooleanPrivateSubForm_Load()flag=TrueTimer1.Enab
下面关于控件数组的叙述中正确的是()。
窗体上有一个名称为Command1的命令按钮,其事件过程如下:PrivateSubCommand1_Click() x="VisualBasicProgramming" a=Right(x,11) b=Mid(x,7,5) c=
窗体上有单选钮和列表框控件。单击名称为Option1、标题为"国家"的单选钮,向列表框中添加国家名称,如下图所示。Option1的单击事件过程如下:PrivateSubOption1_Click() Dimarr arr=Array("
用语句Open"C:\teac.txt"ForInputAs#1打开文件后,就可以编程序
下列符号常量的声明中不合法的是
为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为( )。
鼠标拖放控件要触发两个事件,这两个事件是( )。
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
一棵二叉树中共有80个叶子结点与70个度为1的结点,则该二叉树中的总结点数为
随机试题
生产资料所有制的实现形式主要表现为
下列哪项属于精神科危机干预的范围()
病毒性心肌炎急性期化验可见
护士凭经验没有查对药物,导致输错药物,造成患者死亡。其行为属于
伪劣产品尚未销售,货值金额达到()元以上的,应以生产、销售伪劣产品罪(未遂)定罪处罚。关于括号处的填空,下列哪一选项是正确的?()
在编制招标控制价过程中,进行综合单价组价时,暂估单价的材料应计入()。
以下不属于会计结果的是()。
滚动预算能够使预算期间与会计期间相配合,便于考核预算的执行结果。()
个人所得税纳税主体是指在中国境内有固定住所或者无固定住所而在境内居住满一年,从中国境内和境外取得所得的个人;在中国境内无固定住所又不居住或者无固定住所而在境内居住不满一年,从中国境内取得所得的个人。下列不必交个人所得税的一项是()。
ThescientificnameistheHoloceneAge,butclimatologistsliketocallourcurrentclimaticphasetheLongSummer.Thehistory
最新回复
(
0
)