首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.眦文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并显示
在考生文件夹下有一个工程文件sjt5.vbp,包含了所有控件和部分程序。当程序运行时,单击“打开文件”按钮,则弹出“打开”对话框,默认目录为考生目录,默认文件类型为“文本文件”。选中in5.眦文件(如图1所示),单击“打开”按钮,则把文件中的内容读入并显示
admin
2017-09-20
50
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
下列数组声明正确的是()。
下列程序运行后的输出结果是【】。PrivateSubf(k,s)s=1Forj=1Toks=s*jNextEndSubPrivateSubCommand1_Click()Sum=0Fori=1
下列事件过程的功能是:建立一个名为Data1的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为1,2,3,…,90。请在空白处填入适当的内容,将程序补充完整()。PrivateTypeAngKAsInteger
以下程序代码用来实现如下功能:单击命令按钮弹出对话框,在其中输入正数后单击确定,弹出一个提示信息显示刚才输入的正数,否则提示"error"。请填空。PrivateSubCommand1_Click()DimaAsInteger,bAsSt
如果准备读文件,打开顺序文件“text.dat”的正确语句是
执行如下两条语句后,窗体上显示的是()。a=9.8596PrintFormat(a,“$00,00.00”)
在关系代数运算中,有5种基本运算,它们是()。
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Forml和Form2,启动窗体为Forml。在Forml上画一个命令按钮Commandl,程序运行后,要求当单击该命令按钮时,Forml窗体消失,显示窗体Form2,请在横线处将程序补充
刚建立工程时,使窗体上的所有控件具有区别于默认值的相同的字体格式,应对______的______属性进行设置。
随机试题
女,38岁。寒战、高热、咳脓痰4天。查体:体温39.5℃,右肺闻及湿啰音,X线胸片示:右肺下叶大片状致密影。给予抗生素治疗,2天后症状加重,胸痛并呼吸困难,右胸呼吸音降低,胸片示右胸腔积液。以下治疗错误的是()
简述产品衰退期的企业市场策略。
下列有关“相位分析”的描述,选择正确的概念。将心脏各部位开始收缩的时间以一种显著标志(如黑色或白色)依次进行动态显示,即可直观地观察心肌激动传导的过程
组织中具有晶鞘纤维的药材是
储存时中药饮片的水分控制在
政府采购中,质疑人是()。
现行的《税收征管法》于()实施。
下列关于税收实体法构成要素的说法中,正确的有()。
《会计法》规定,隐匿或者故意销毁依法应当保存的会计凭证、会计账簿、财务报表的行为,由县级以上人民政府财政部门予以通报。()
根据案例描述,该企业应按加工贸易货物办理相关材料的进口手续。除加工贸易合同外,该企业向海关办理加工贸易合同备案时应提交的主要单证还包括()。根据案例提供的已知条件和加工贸易银行保证金台账的规定,企业办理加工贸易合同备案时应()。
最新回复
(
0
)