首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图l所示),单击“打开”按钮,则把文件中的内容读入并
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图l所示),单击“打开”按钮,则把文件中的内容读入并
admin
2020-04-08
36
问题
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.txt文件(如图l所示),单击“打开”按钮,则把文件中的内容读入并显示在文本框(Textl)中;单击“修改内容”按钮,则将Textl中的大写字母“E”、“N”、“T”改为小写,把小写字母“e”、“n”、“t”改为大写;单击“保存文件”按钮,则弹出“另存为”对话框,默认文件类型为“文本文件”,默认文件夹为考生文件夹。默认文件为“out5.txt”(如图2所示),单击“保存”按钮,则将Textl中修改后的内容存到out5.txt文件中。
窗体中已经给出了所有控件和程序,但程序不完整,去掉程序中的注释符,把程序中的?改为正确的内容,并编写“修改内容”按钮的Click事件过程。
注意:考生不得修改已经存在的程序。必须把Textl中修改后的内容用“保存文件”按钮存储结果,否则无成绩。最后,按照原文件名将程序存盘。
选项
答案
【操作步骤】 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,去掉程序中的注释符“′”,将问号改为正确的内容。 参考答案(阴影部分是需考生填入的内容) Private Sub Commandl_C1ick() Dim S As String CommonDialogl.Filter="所有文件*.*|文本文件|*.txt"设置过滤条件,过滤文件类型 CommonDialogl.FiiterIndex=
2
′指定文件类型列表框中的值为所有文件 On Error GoTo openerr′如果出错则转回openerr CommonDialogl.InitDir=App. Path′指定打开对话框中的初始目录为App.Path CommonDialogl.ShowOpen′显示打开对话框 Open
CommomDialogl.Filename
For Input As #1′打开指定文件 Input#1,s′读取文件到S Close #1′关闭文件 Textl.Text=
s
′s中记录了读取内容 openerr: End Sub Private Sub Command2_Click() ′考生需要编写的程序 Dim ch As String Dim S AS String Dim n As Long s=Textl.Text Textl.Text="" For n=1 To Len(s)’查找文本中的“E”、“N”、“T”、“e”、“n”、“t”并做相应的改变 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 Textl.Text=Textl&ch Next n End Sub Private Sub Command3 Click() CommonDialogl.Fiiter=”文本文件I *.txt |所有文件|*.*" CommonDialogl.FilterIndex=1′指定文件类型列表框中的值为文本文件 On Error GoTo openerr CommonDialogl.FileName="out5. txt"’所选文件默认名 CommonDialogl.InitDir=App.Path CommonDialogl.Action=
2
′显示另存为对话框 Open CommonDialogl.FileName For Output As #l Print #1,Textl Close #1 oPenerr: End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘,如图4.30所示。 [*]
解析
打开文件的命令是Open,其常用形式为:
转载请注明原文地址:https://jikaoti.com/ti/ztx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下能够设置控件焦点的方法是( )。
在窗体上画一个名称为CD1的通用对话框,一个名称为Command1的命令按钮。然后编写如下事件过程:PrivateSubCommand1_Click()CD1.FileName=""CD1.Filter="所有文件|*.*|(*.
程序运行时,拖动滚动条上的滚动框,则所触发的事件是
运行如下程序:PrivateSubCommandl_Click()Dima(5,5)AsIntegerF0ri=1To5Forj=1To4a(i,j)=i*2+JIfa(i,
窗体上有一个名称为Framel的框架(如图),若要把榧架上显示的“Framel”改为汉字“框架”,下面正确的语句是()。
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text="" Text2.Text="" Text1.SetFocusEndS
窗体上有名称为Commandl的命令按钮和名称为Text1的文本框PrivateSubCommandl一Click()Text1.Text=“程序设计”Text1.SetFocusEndSubPriv
随机试题
患者男性,29岁,呼吸困难,气急,乏力,心衰,心界扩大,听诊有瓣膜反流性杂音,临床诊断为扩张型心肌病。关于扩张型心肌病,二尖瓣的改变有
单纯疱疹病毒(HSV)已发现的天然宿主是
女性,45岁,一年来上腹胀痛,无规律性,并有厌食,体重减轻约10kg,近2天呕暗红色胃内容物,最可能的诊断是
心绞痛发作时疼痛持续时间一般为
五行中“金”的特性是
作为国家行政的分类,给付行政和下列哪类行政是相对应的一种分类?
关于基金从业人员投资证券投资基金的监督管理,下列说法错误的有( )。
2015年6至8月间,甲市新城区接连发生夜间楼房入室盗窃案件,犯罪分子趁住户熟睡之机入室实施盗窃,遇有事主发觉则以暴力相威胁。该类案件让群众缺乏安全感,甲市公安局高度重视,组织了专项打击行动,一举抓获了4个盗窃犯罪团伙,团伙成员均为乙市丙县籍人员。通
历史唯物主义认为人民群众是历史的创造者,这是因为()。
Itisverydifficulttosayjustwhencolonizationbegan.ThefirsthundredyearsafterChristopherColumbus’sjourneyofdiscov
最新回复
(
0
)