首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件Sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开” 按钮,则把文件中的内容读入
在考生文件夹下有一个工程文件Sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开” 按钮,则把文件中的内容读入
admin
2015-06-30
32
问题
在考生文件夹下有一个工程文件Sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图1所示),单击“打开” 按钮,则把文件中的内容读入并显示在文本框(Text1)中;单击“修改内容”按钮,则将Text1中的大写字母“E”、“N”、“T”改为小写,把小写字母“e”、“n”、“t”改为大写;单击“保存文件”按钮,则弹出“另存为”对话框,默认文件类型为“文本文件”,默认文件夹为考生文件夹,默认文件为“out5.txt”(如图2所示),单击“保存”按钮,则将Text1中修改后的内容存到out5.txt文件中。
窗体中已经给出了所有控件和程序,但程序不完整,去掉程序中的注释符,把程序中的?改为正确的内容,并编写“修改内容”按钮的Click事件过程。
注意:考生不得修改已经存在的程序。必须把Text1中修改后的内容用“保存文件”按钮存储结果,否则无成绩。最后,按照原文件名将程序存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Private Sub Command1_Click() Dim s As String CommonDialog1.Filter = "所有文件|*.*|文本文件|*.txt" ’ CommonDialog1.FilterIndex = ? On Error GoTo openerr CommonDialog1.InitDir = App.Path CommonDialog1.ShowOpen ’ Open ? For Input As #1 Input #1, s Close #1 ’ Text1.Text = ? openerr: End Sub Private Sub Command2_Click() ’ 考生需要编写的程序 End Sub Private Sub Command3_Click() CommonDialog1.Filter = "文本文件|*.txt|所有文件|*.*" CommonDialog1.FilterIndex = 1 On Error GoTo openerr CommonDialog1.FileName = "out5.txt" CommonDialog1.InitDir = App.Path ’ CommonDialog1.Action = ? Open CommonDialog1.FileName For Output As #1 Print #1, Text1 Close #1 openerr: End Sub 程序结束 参考答案 第1个?处填入:2 第2个?处填入:CommonDialog1.FileName 第3个?处填入:s 第4个?处填入:2 ’ 考生需要编写的程序 Private Sub Command2_Click() Dim ch As String Dim s As String Dim n As Long s = Text1.Text Text1.Text = "" For n = 1 To Len(s) ch = Mid(s, n, 1) If ch = "E" Or ch = "N" Or ch = "T" Then ch = LCase(ch) ElseIf ch = "e" Or ch = "n" Or ch = "t" Then ch = UCase(ch) End If Text1.Text = Text1 & ch Next End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/rtQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关系模型中,能使经运算后得到的新关系中属性个数多于原来关系中属性个数的是
建立打开文件、保存文件、颜色、字体、打印对话框所使用的方法分别为【】、【】、ShowColor、ShoWFont和ShowPrinter。
在窗体上画一个命令按钮,其名称为Commandl,然后编写如下程序:FunctionFonc(ByValxAsInteger,yAsInteSer)y=x*yIfy>0Then
编写如下事件过程;PrivateSubForm_MouseDown(ButtonAsInteger,ShiftAsInteger,XASSingle,YAsSingle)IfShif=6AndBu
下列程序段的执行结果为______。Dimm(3,3)AsIntegerDimiAsIntegerDimjAsIntegerDimxAsIntegerFori=1To3m(i
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指______。
在程序的每个空白处填写一条适当的语句,使程序完成相应的操作。程序实现的功能是:窗体上有文本框Text1和若干复选框,其中复选框Check1设置文本框Text1显示的文本是否加下划线。Check1的单击事件过程如下:PrivateSubCheck
在子过程Sub…EndSub中使用的形式参数可以是()。
设A=2,B=-2,则表达式A/2+1>B+5OrB*(-2)=6的值是______。
执行语句Open"TC.dat"ForRandomAs#1Len=50后,对文件TC.dat中的数据能执行的操作是()。
随机试题
试讨论f(x,y)=在点(0,0)处是否可微?
A.50~100mlB.200~400mlC.600~800mlD.1000ml人体24小时通过皮肤蒸发的水分约为
对于地表水形成井巷涌水的原因,说法不正确的是()。
关于按产品用途划分的各类个人贷款,下列说法错误的有()。[2009年6月真题]
2013年刘某为自己投保人寿保险,并指定其妻宋某为受益人。2015年刘某实施抢劫时被他人捅死。事后,宋某请求保险公司支付保险金遭到拒绝。经查,刘某已缴纳3年保险费。下列关于保险公司是否承担支付保险金责任的表述中,符合保险法律制度规定的是()。(20
如果“应交税费——转让金融商品应交增值税”科目有贷方余额,说明本年度的金融商品转让损失无法弥补,且本年度的金融资产转让损失不可转入下年度继续抵减转让金融资产的收益。()
司马光的《资治通鉴》是我国第一部编年体史书,在此之前,还没有编年体史书。
注意事项1.本题本由给定资料与作答要求两部分构成。考试时限为150分钟。其中,阅读给定资料参考时限为40分钟,作答参考时限为110分钟。满分100分。2.监考人员宣布考试开始时,你才可以开始答题。3.请在题本、答题纸指定位置填
A、 B、 C、 D、 B提示框中图形的规律为:第二个图形上半部分的内部与其余两个图形上半部分的内部不同,第二个图形的下半部分也与其余两个图形的下半部分不同。问题框中的图形也应符合此规律,故选B。
信赖保护原则是行政法的一项基本原则,是指政府对自己做出的行为或承诺应守信用,不得随意变更,反复无常。根据上述定义,下列违反信赖保护原则的是:
最新回复
(
0
)