首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp。窗体中已经给出了所有控件。程序运行时,单击”读入文件”按钮,将显示一个”打开”对话框,可以在该对话框中选择考生文件夹下的文本文件in4.txt,并把该文件的内容显示到Textl文本框中。 要求:请去掉程序中的注
在考生文件夹下有一个工程文件sjt4.vbp。窗体中已经给出了所有控件。程序运行时,单击”读入文件”按钮,将显示一个”打开”对话框,可以在该对话框中选择考生文件夹下的文本文件in4.txt,并把该文件的内容显示到Textl文本框中。 要求:请去掉程序中的注
admin
2019-06-11
42
问题
在考生文件夹下有一个工程文件sjt4.vbp。窗体中已经给出了所有控件。程序运行时,单击”读入文件”按钮,将显示一个”打开”对话框,可以在该对话框中选择考生文件夹下的文本文件in4.txt,并把该文件的内容显示到Textl文本框中。
要求:请去掉程序中的注释符,并把程序中的?改为正确的内容,使其能正确运行,但不能修改程序中的其他部分和控件属性。最后用原来的文件名保存工程文件和窗体文件。
选项
答案
步骤1:打开考生文件中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符”’“,将问号”?”改为正确的内容。 参考代码: Private Sub Commandl_Click( ) Dim n As Long CDl.FileName=““ CD1.Filter=“所有文件|*.*|文本文件 |*.txt | Word文档|*.doc” CD1.FilterIndex=2 CD1.ACtion=1 If CD1.FileName<> ““Then Open CD1.FileName For Input As#1 n=LOF(1) Textl=Input$(n,#1) ClOse #1 EndIf End Sub 步骤2,按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/z8Up777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体上有一个名称为Command1的命令按钮,单击该按钮时所实现的功能是产生10个随机整数,然后从键盘输入一个整数,查找该数在数组中的位置。若找到,输出该数的位置;若没有找到,给出相应的提示。该命令按钮的单击事件过程如下:PrivateSubComm
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。窗体文件的程序如下:PrivateTypexaAsInteger:bAsIntegerEndTypePrivateSubCommand1_Click()
下列选项中不属于面向对象程序设计特征的是
假定有如下语句:answerS=MsgBox("String1",,"String2","String3",2)执行该语句后,将显示一个信息框,单击其中的“确定”按钮,则answerS的值为
语句PrintFormat$(23846.5,"000,000.00")的输出结果是
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下:PrivateSubCommand1_Cliek()Open"c:\f1.txt"ForInputAs#1:Open"c:\f2.txt"ForOutputAs#2Do
为了保存数据,需打开顺序文件“E:\UserData.txt”,以下正确的命令是
某人编写了下面的程序,希望能把Textl文本框中的内容写到out.txt文件中PPrivateSubCommand1_Click()Open"out.txt"ForOutputAs#2Print"Text1"Close#2EndSub
随机试题
射频磁场的生物效应主要表现为
女,67岁,走路滑倒后,左手掌着地,X线片显示Colles骨折,首选的治疗方案是( )。男,18岁,从高处坠落,X线片显示左尺桡骨骨折,明显移位,手法整复失败,下一步治疗方案是( )。
温中散寒止呃法适用于呃逆何证型
根据《地下水质量标准》,地下水水质监测频率每年不得少于()。
如果出口货物需要办理出口收汇核销,报关员应在申报时向海关提交()。
一般资料:男,28岁,已婚,公司职员。案例介绍:自大学毕业后,就一直在现在的公司工作,不仅人长得帅气,而且对人又非常热情,因此人际关系好,再加上工作能力强且勤奋,深得上司的好评,很快便被提拔为部门主管。一年前,由于一场意外的事故,腿部受伤,虽然经
净现值以绝对数表示,不便于在不同投资规模的方案之间进行对比。()
根据能力的二因素论,哪种因素是决定人的能力的主要因素?()
Words______meaning,asweallknow.
Theteacheraskedthechildrentowriteon______line,butTomjustwrotecarelessly______lines.
最新回复
(
0
)