首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command l_Click() Open”
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command l_Click() Open”
admin
2019-04-29
78
问题
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command l_Click()
Open”c:\f1.txt”For Input As#1
Open”c:\f2.txt”For Output As#2
Do While Not EOF(2)
Line Input#1,str1
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号文件用于写入。当进行读取时循环条件应该为Not EOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/fLUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于类、对象、属性和方法的叙述中,错误的是()。
在考生文件夹下有一个工程文件sjt3.vbp。程序运行时,单击窗体则显示如图3-155所示的图案。请去掉程序中的注释符,把程序中的?改为正确的内容。注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
在考生文件夹下有一个工程文件sjt5.vbp,其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件,但程序不完整。要求:请去掉程序中的注
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个文本框,名称为Text1,内容为“VB程序设计”;再画两个命令按钮,其名称分别为Command1和Command2,标题分别为“扩大”和“缩小
请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Form1的窗体上画一个命令按钮和一个垂直滚动条,其名称分别为Cmd1(标题为“设置”)和Vsb1,编写适当的事件过程。程序运行后,如果单击命令按钮,则按如下要求设置
假定通用对话框的名称为CD1,命令按钮的名称为Command1,则单击命令按钮后,能使打开对话框的标题为“通用对话框”的事件过程是()。
下列表达式中值为False的是()。
某二叉树的前序遍历序列为ABCDE,中序遍历序列为CBADE,则后序遍历序列为()。
“商品”与“顾客”两个实体集之间的联系一般是
软件测试的目的是()。
随机试题
《登幽州台歌》是我国______代诗人陈子昂的蕴含深刻人生哲理的作品。A.汉B.晋C.唐D.宋
His______hadalwaysbeentobecomeanarchitect.
关于肠结核腹部肿块的叙述,不正确的是
女性,32岁,产后7个月发现腹壁一隆起型肿块,约5cm,质硬,病变界限不清,镜下长形纤细的梭形细胞增生,无明显异型性,周围有数量不等的血管。该患者最可能为
指出阳邪所致疾病性质的是指出阴邪所致疾病性质的是
如下图所示,两等长杆AB与BC在点B用铰链连接,又在杆的D、E两点连一弹簧,弹簧的刚性系数为k,当距离AC等于a时,弹簧内拉力为零。点C作用一水平力F,设AB=ι,BD=b,杆重不计,则系统平衡时距离AC之值为()。
粉煤灰水泥的特性主要是()。
更正错账时,划线更正法的适用范围是()。
世界上最先出现的国际货币体系是()。
IEEE802.3标准中,数据链路层被划分为两个子层,________。
最新回复
(
0
)