首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮,要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Commandl Click() Open“carl.txt”For
窗体上有一个名称为Commandl的命令按钮,要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Commandl Click() Open“carl.txt”For
admin
2015-12-09
45
问题
窗体上有一个名称为Commandl的命令按钮,要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Commandl Click()
Open“carl.txt”For Input As#1
Open“c:\f2.txt”For Output As#2
Do While Not EOF(2)
Line Input#1,strl Print#2,str1
Loop
Close Kill“c:\f1.txt”
End Sub
选项
A、打开f1.txt应该使用Output方式,打开f2.txt应该使用Input方式
B、Not EOF(2)应该改为Not EOF(1)
C、Line Input应改为Get
D、Close语句改为Close All.
答案
B
解析
打开文件的基本格式为:Open FileName For Mode.As#FileNumber。打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为NotBOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/XfLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
为了避免流程图在描述程序逻辑时的不灵活性,Nassi和Shneiderman提出了用方框图来代替传统的程序流程图,通常也把这种图称为
下列事件过程的功能是:通过Foma_Load事件给数组赋初值为35、48、15、22、67,Form_Click事件找出可以被3整除的数组元素并打印出来。请在空白处填人适当的内容,将程序补充完整。DimArr()PrivateSubFor
下面程序的功能是利用随机函数模拟投币,方法是:每次随机产生一个0或1的整数,相当于一次投币,1代表正面,0代表反面。在窗体上有三个文本框,名称分别是Text1、Text2、Text3,分别用于显示用户输入投币总次数、出现正面的次数和出现反面的次数,如下图
当对命令按钮的Picture属性装入bmp图形文件后,这项按钮上并没有显示所需的图形,原因是没有对______属性设置为1(Graphical)。
VB的3种结构化程序设计的3种基本结构是()。
为了在按下Esc键时执行某个命令按钮的Click事件过程,需要把该命令按钮的一个属性设置为True,这个属性是()。
如果一个工程含有多个窗体及标准模块,则以下叙述中错误的是()。
随机试题
#include
voidprty(int*x)main(){inta=5;prty(&a);printf("%d\n",a);
关于Du血型的理解是
男性,52岁,咳嗽、咳痰10年,1周前受凉后症状加重,查体:两肺散在哮鸣音和湿哕音,胸片示两肺纹理增多紊乱。该病人诊断应首先考虑
下列物质中,属于酚类的是()。[2011年真题]
根据《安全生产法》的规定,用于生产、储存危险物品的建设项目,应当按照国家有关规定进行()。【2005年考试真题】
学习积极性的核心内容是()
2011年,全国研究与试验发展(R&D)经费支出8687亿元,比2002年增长5.7倍,占国内生产总值的比重由1.07%上升到1.84%。2011年,研究与试验发展人员全时当量288.3万人年,比2002年增长1.8倍。技术市场成交额4764亿元,
某甲与某乙有仇,遂寻机报复。一天,某甲得知某乙一人在家,便携带匕首向某乙家走去,途中猛觉不妥,刺伤或刺死某乙自己也要受法律制裁,便返回家中。某甲的行为属于()。
网桥(Bridge)是______的互连设备。
Inrecentdecadeschildspecialistshavetriedmoreandmoretohelpparentswiththeirchildren’sschoolbehavior.Schoolsofe
最新回复
(
0
)