首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.眦文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并显示
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.眦文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并显示
admin
2017-09-20
59
问题
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.眦文件(如图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 CommonDialogl.Filter=”所有文件| *.*|文本文件|*.txt”设置过滤条件,过滤文件类型 CommonDialogl.FilterIndex=2’指定文件类型列表框中的值为所有文件 On Error GoTo openerr’如果出错则转回 openerr CommonDialogl.InitDir =App. Path’指定打开对话框中的初始目录为App.Path CommonDialogl.ShowOpen’显示打开对话框 Open CommonDialogl.FileName For Input As #1’打开指定文件 Input #1,S’读取文件到S Close #1’关闭文件 Text1.Text=s’s中记录了读取内容 openerr: End Sub 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)’查找文本中的“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 Text1.Text=Text1&ch Next n End Sub Private Sub Command3_Click() CommonDialog1.Filter=”文本文件|*.txt|所有文件|*.*” CommonDialog1.FilterIndex=1’指定文件类型列表框中的值为文本文件 On Error GoTo openerr CommonDi alogl.FileName=”out5. txt”’所选文件默认名 CommonDialog1.InitDir=App.Path CommonDialog1.Action=2’显示另存为对话框 Open CommonDialogl.FileName For Output As #1 Print #1,Text1 Close #1 openerr: End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘,如图3.30所示。 [*]
解析
转载请注明原文地址:https://kaotiyun.com/show/xkGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了使用窗体输出,使Print方法在Form_Load事件中起作用,必须设置窗体的()属性。
下列程序段的执行结果为()。DimA(3,3)ForM=1To3ForN=1To3IfN=MOrN=3-M+1ThenA(M,N)=1ElseA(M,N)=0
建立打开文件、保存文件、颜色、字体、打印对话框所使用的方法分别为【】、【】、ShowColor、ShowFont和ShowPrinter。
要获取当前驱动器,应使用驱动器列表框的()属性。
以下程序用随机函数模拟掷骰子,统计掷50次骰子出现各点的次数。阅读该程序,并在【】和【】处填上正确的内容。PrivateSubCommand1_Click()Dimd(6)fori=1To50n=【】d(n)=【
数据库设计包括概念设计、【】和物理设计。
事件驱动是一种适用于______的编程方式。
随机文件使用Put语句写数据,使用【】语句读数据。
以下程序计算自然数e的值,要求精确到1015,阅读下列程序。已知e的计算公式为:e=1+1/1!+1/2!+…+1/n!。请在【】和【】处填上正确内容。PrivateSubCommandl_Click()【】n=0:term
如果准备读文件,打开顺序文件“text.dat”的正确语句是
随机试题
面粉中所含的淀粉种类、数量不同,产生主坯的特性是相同的。()
外斐反应属于
毒物中毒的严重程度与后果往往取决于作用毒物的剂量、作用的时间以及诊断和救治是否准确与及时等。对于急性中毒者,必须迅速做出准确判断,及时果断地采取有效的救治措施。皮肤接触腐蚀性毒物,须用中和液或解毒液冲洗,且冲洗要达()
男性,60岁。行前列腺增生摘除术,术后膀胱冲洗时应选择的溶液是()。
财务分析方法中,采用()可以分析变化的原因和性质,并预测企业未来的发展前景。
对于同一个消费者来说,同样数量的商品总是提供同量的效用。()
我国水资源的人均占有量仅为世界人均占有量的()。
306,206,137,79,46,()
每个人的生命只有一次,即使在人生的道路上,事业、前途、爱情、家庭都如泡沫一样破灭了,也不必悲观,不要绝望。要知道,生存本身就是一种资本,一种幸运。一种对不公命运勇敢的挑战。感谢生命,赋予我像杨絮一样纯洁而质朴,异常珍贵而不懈追求的存在。作者要表达的观点是
Natalie,MichelleandAnthonyhavetobeatschoolby8:45a.m..Michelleisneverlateforschool.OnMondayAnthonywaslate
最新回复
(
0
)