首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub.Commandl_Click() Open"c:\f1.txt"F
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub.Commandl_Click() Open"c:\f1.txt"F
admin
2020-04-18
37
问题
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub.Commandl_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等几种。本题中打开了两个文件,其中l号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为Not EOF(11即还没有读取到文件结尾。
转载请注明原文地址:https://jikaoti.com/ti/0hx0FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
现有如下一段程序:PrivateSubCommandl_Click()X=UCase(InputBox(“输入:”))SelectCaseXCase“A”To“C”Print“考核
对于文本框Text1,能够获得按键的ASCII码值的事件过程是
如果要将一个窗体从内存中清除,应使用的语句是
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() a$=InputBox("请输入一个二进制数") n=Len(a$) Fori=1Ton Dec=Dec*2+
下列关于控件焦点的叙述中正确的是()。
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是()。
在窗体(Name属性为Forml)上画两个文本框(Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Command1),然后编写如下两个事件过程()。PrivateSubCommand1_Click()
要求在程序运行时,如果按住鼠标左键不放而移动鼠标,鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中,如右图所示,放开鼠标左键后,停止同步显示。下面可以实现此功能的程序是( )。
为了使通用对话框弹出的窗口标题显示为“文件操作”,应对通用对话框控件设置的属性是()。
设有关键码序列(66,13,51,76,81,26,57,69,23),要按关键码值递增的次序排序若采用快速排序法,并以第一个元素为划分的基准,那么第一趟划分后的结果为()。
随机试题
陶渊明《饮酒(其七).秋菊有佳色》一诗主要的艺术特色是()
停车数量不大于()辆的汽车库,以及室内无车道且无人员停留的机械式汽车库应设置消防应急照明和疏散指示标志。
电动蔬菜榨汁机(重量40公斤)
A公司与B大学合作开发完成一项发明,在双方事先没有约定的情况下,()。
ScarboroughGeneralHospitalhastwo______forcertifiedX—raytechnicianstostartimmediately.
教师通过和其他同事的“头脑风暴”,收集各种教学“病例”,然后进行归类分析,得出解决对策的方法属于()。
从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性。()
2005年,浙江省的贸易顺差为()。
设曲线弧y=sinx(0<x<π)。求出曲线弧的最小曲率半径。
设向量组α1=(1,1,1,3)T,α2=(-1,-3,5,1)T,α3=(3,2,-1,p+2)T,α4=(-2,-6,10,p)T,p为何值时,该向量组线性无关?并在此时将α=(4,1,6,10)T用α1,α2,α3,α4线性表出.
最新回复
(
0
)