首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For
admin
2016-12-13
71
问题
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command1_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号文件用于写入。当进行读取时循环条件应该为NotEOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/m6Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
模块独立性是软件模块化所提出的要求,衡量模块独立性的度量标准是模块的()。
执行x$一InputBox(“请输人x的值”)时,在弹出的对话框巾输入123,在列表框Listl中选中一个列表项(数据为456),使结果为123456的语句是()。
下列程序的执行结果为()。PrivateSubCommandlClick()DimXAsInteger,YAsIntegerx=12:y=20CallValue(x,y)Pri
新建一工程,将其窗体的Name属性设置MyFirst,则默认的窗体文件名为()。
在菜单中,唯一能够识别的事件是【】。
要使菜单项MenuOne在程序运行时失效,使用的语句是
为了防止用户随意将光标置于控件上,应将控件的______属性设置为False。
耦合和内聚是评价模块独立性的两个主要标准,其中【】反映了模块内各成分之间的联系。
若要添加CommonDialog控件,则应从“工程”菜单中选定“部件”,在“部件”对话框的“控件”选项卡中选择______,将控件添加到工具箱中。
将E-R图转换到关系模式时,实体与联系都可以表示成()。
随机试题
A.15日B.30日C.45日D.60日E.90日医师申请职业注册,卫生行政是否准予注册的决定的法度期限是
某男,外伤后意识丧失,呼吸困难,急救时人工呼吸吹气量一般是
服用过量使君子,可出现的不良反应为()
A、药物临床试验机构资格认定办法;B、中药品种保护制度;C、地区性民间习用药材管理办法;D、首次在中国销售的药品的检验费收缴办法;E、首次在中国销售的药品的检验费项目;根据《中华人民共和国药品管理法》由国家药品监
患者,男,60岁,患肝硬化5年,常服利尿剂,近日为补充营养口服蛋白粉,家属发现其表情淡漠,回答问题准确,但吐字不清,有双手扑翼样震颤。治疗原则错误的是()
每套分集水器环路(自分水器总进水管控制阀起,至集水器总出水管控制阀止)的总压力损失不宜超过________kPa。
为发展经济,A市拟当地经济发展特点大力发展畜禽养殖业,拟投资500万元在A市西北方向的城郊建设一个养牛场,规划用地50亩,养殖规模为存栏2000头。养牛场采取半封闭式养殖,设置集中污水处理站将冲洗牛舍的废水就地处理后排入B河(该河流无饮用功能),牛粪由附近
根据企业所得税法的规定,计算企业所得税应纳税所得额时,根据规定,下列支出不得扣除的是( )。
以下方法中,最能够得出因果关系的研究方法是()。
假定有以下通用过程:FunctionFun(nAsInteger)AsIntegerX=n*nFun=x一11EndFunotion在窗体上画一个命令按钮,其名称为Commandl,然后编写如下事
最新回复
(
0
)