首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.tim。窗体上三个命令按钮的名称分别是Command1、Command2和Command3,标题分别是“显示”、“统计”和“保存”。运行程序时,单击“显示”按钮,从文件。in5.txt
admin
2019-05-14
57
问题
在考生文件夹下有一个工程文件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)在名称为Forml,标题为“考试”的窗体上画一个名称为Combol、初始内容为空的下拉式组合框。下拉列表中有“隶书”、“宋体”和“楷体”三个项目。运行后的窗体如图3一18
(1)在考生文件夹下有工程文件sjt3.vbp。程序运行时的窗体如图3—185(a)所示。输入商品名称后,选中一种付款方式,则“成交”按钮变为可用,选择一种或多种“服务”后,单击“成交”按钮,则把相应信息显示在下面的图片框中,如图3.185(b)所示。若不
设数据集合为D={1,2,3,4,5},下列数据结构B=(D,R)中为非线性结构的是()。
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
在名称为Form1的窗体上添加一个名称为Label1,标题为“口令”的标签;添加一个名称为Text1的文本框;再添加三个命令按钮,名称分别为Command1、Command2、Command3,标题分别为“显示口令”、“隐藏口令”、“重新输入”。程序运行
在名称为Form1,标题为“框架”的窗体上添加一个名称为:Frame1,且标题为空的框架。框架内含有两个单选按钮,名称分别为Opt1和Opt2,其标题分别为“字体”、“大小”。注意:存盘时必须存放在考生文件夹下,工程文件名保存为sjt1.vbp,窗体文件
为了删除列表框中的一个列表项,应使用的列表框方法是
现有程序如下:OptionBase1PrivateSubForm_Click()Dimx(5,6)AsInteger,y(5)AsIntegerFori=1To5Forj=1To6x(i,j)=Int(Rnd*9+1)
在标题为“列表框”、名称为Form1的窗体上添加一个名称为List1的列表框,通过属性窗口输入4个列表项:“数学”、“语文”、“历史”、“地理”,列表项形式采用复选框形式,如图所示。列表框的宽为1100,高不限。注意:存盘时必须存放在考生文件夹下,工程文
在名称为Form1的窗体上添加一个名称为Drive1的驱动器列表框,一个名称为Dir1的目录列表框,一个名称为Filel的文件列表框,名称为Label1、标题为“文件名”的标签和名称为Label2、BorderStyle为1的标签。将窗体的标题设置为“文件
随机试题
阅读下面的文字:其夜,华林部①过马伶:“子,天下之善技者也。然无以易李伶。李伶之为严相国至矣。子又安从受之而掩其上哉?”马伶曰:“固然,天下无以易李伶;李伶即又不肯授我。我闻今相国昆山顾秉谦者②。严相国俦③也。我走京师,求为其门卒三年,日侍相国于
为非特异性梅毒血清试验的是
下列关于聚酯片基的特点,叙述错误的是
选择人工前牙不必考虑的因素是
下列关于人民监督员制度的表述,哪一项是不能成立的?()
对于一家普通的国内上市公司,首次向银行申请短期贷款时,应提交的资信审查文件有()。
原始凭证金额有错误的,应当由出具单位进行更正,并在更正处加盖出具单位印章。()
外国旅游者无论因为何种原因要求提前离团回国,导游人员都要在领导的指示下帮助其预定机票,办理分离签证及其它离团手续,所需费用由旅游者自理。()
已知当x→时,arcsinx-arctanax与bx[x-ln(1+x)]是等价无穷小,则ab=()
Alcoholhasapeculiarrelationshiptohappiness.Wedrinktocelebrate,butbecausealcoholworksasadepressant,itendsupd
最新回复
(
0
)