首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体外观如图2.5(a)所示。三个命令按钮的名称分别为Command1、Command2和Command3,标题分别为“读取数据”、“首字母大写”和“存盘”。程序运行后,如果单
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体外观如图2.5(a)所示。三个命令按钮的名称分别为Command1、Command2和Command3,标题分别为“读取数据”、“首字母大写”和“存盘”。程序运行后,如果单
admin
2016-12-29
53
问题
在考生文件夹下有一个工程文件sjt5.vbp,相应的窗体文件为sjt5.frm。窗体外观如图2.5(a)所示。三个命令按钮的名称分别为Command1、Command2和Command3,标题分别为“读取数据”、“首字母大写”和“存盘”。程序运行后,如果单击“读取数据”命令按钮,则读取考生文件夹下in5.txt中的全部文本(文本中的单词与单词之间或标点符号与单词之间均用一个空格分开),并在文本框中显示出来。文本内容如下:
TuckeddeepwithinthepromisesandpoliciesofhisStateoftheUnionaddress,PresidentBushutteredthr_ccwordsthatspeakvolumesaboutWashington’sparalysisinaddr、cssingtheplightoflhefortymillionAmericanswholackhealthinsurance.InbetweenhisdiscourseonMedicareandhissupportforalow-incomehealthcaretaxcredit,Bushcalledforsomethingcalledassociationhealthplans.
如果单击“首字母大写”命令按钮,则将文本框中每个单词的第一个字母变为大写字母(如果原来已是大写字母则不改变),并在文本框中显示出来,如图2.5(b)所示;如果单击“存盘”命令按钮,则把文本框中的内容(首字母大写后)保存到考生文件夹下的文件out5.txt中。窗体文件中已给出了部分程序,请把它补充完整,使其实现上述功能。
要求:
1)编写“读取数据”命令按钮的Click事件过程。
2)去掉“首字母大写”命令按钮和“存盘”命令按钮事件过程中的注释符,把程序中的?改为正确的内容,使其能正确运行。
3)用原来的文件名保存工程文件和窗体文件。
选项
答案
【操作步骤】 步骤1:打开考生文件夹中的工程文件sjt5.vbp,在代码编辑窗口中,去掉程序中的注释符“*”,将问号“?”改为正确的内容。 参考代码: ch=Mid(OidSen,i,1) newSen=newSen&ch Write#1,Textl.Text 步骤2:编写“读取数据”命令按钮的单击事件。 参考代码: Private Sub Commandl—Click() Dim S As String Open”in5.txt”For Input As 1 Line Input:l}1,S Close#1 Textl.Text=S End Sub 步骤3:按
键运行程序,先单击“读取数据”按钮,接着单击“首字母火写”按钮,最后单击“存盘”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/W9Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
执行下列程序段后,输出的结果是()。Forkl=0To4y=20Fork2=0To3Y=10Fork3=0To2y=Y+10Nextk3Nextk2Nextk1
在窗体上画一个名称为Labell、标题为“VisualBasic考试”的标签,两个名称分别为Commandl和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timerl的计时器控件,并把其Interval属性设置为500.如图
新建一工程,将其窗体的Name属性设置MyFirst,则默认的窗体文件名为()。
假定有如下的Sub过程:SubSub1(xAsSingle,yAssingle)t=xx=t/yy=tModyEndSub在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand
下面4项中不属于面向对象系统三要素的是()
下列程序要求用户输入一个年份,并能够判断用户输入的年份是否是闰年,下划线处应填()。SubEnSure()DimyearAsIntegeryear=Val(InputBox("请输入年份:"))
要使单击命令按钮与按下<Esc>键实现相同的作用,则应设置()属性为True。
VisualBasic中的工程文件的扩展名是______。
已知变量boo1Var是一个布尔型的变量,如果要给其赋值为True,则正确的赋值语句就是______。
随机试题
行为人吴某为了快速“致富”,出售假币总面额2万元,同时又使用假币5000元去购买生活用品。对吴某应以出售假币罪从重处罚。
铸造全冠牙体预备正确的步骤不包括
扩张型心肌病左、右心室同时衰竭时,与临床症状和体征最有关的因素是
公民李某在甲市A区有平房一间,搬家前一直居住在其中。2009年3月李某在B区购得商品房一套,于是从平房中搬出,迁往B区。为了不让平房闲置,李某将平房借与在A区工作的朋友张某和俞某居住。2010年8月,住在同市C区的鲁某看中了这间平房,便与张某、俞某商量想买
有数据显示,全美约()的买主和()的卖主通过经纪人的帮助来买卖房屋,只有()的卖方没有通过经纪人。
Onceuponatime,arichmanwantedtomakeatrip(旅行)toanothertown.Hetriednotonlytotakethingstosellbutalsotota
(2015年)设是二阶常系数非齐次线性微分方程y"+ay’+by=cex的一个特解,则
使用【粘贴uRL】对话框,对FTP站点192.168.1.100进行连接,用户名和密码均为broad。
ThelargestcityinAustraliais
A、Hewantstojointhewomanlater.B、Hewantstomeetthewomanathome.C、Hewantstowatchthebasketballgame.D、Hewantsto
最新回复
(
0
)