首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下: Private Sub Command l Click() Open”c:\f1.txt”For Input As#l:Open”c:\f2.txt”For Ou
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下: Private Sub Command l Click() Open”c:\f1.txt”For Input As#l:Open”c:\f2.txt”For Ou
admin
2019-01-17
26
问题
窗体上有一个名称为Commandl的命令按钮。其单击事件过程如下:
Private Sub Command l Click()
Open”c:\f1.txt”For Input As#l:Open”c:\f2.txt”For Output As#2
Do While Not EOF(1)
Line Input#1.strl:Print#2.strl
Loop
Close
End Sub
以下关于上述程序的叙述中,错误的是
选项
A、功能是将f2.tXt中的内容复制到f1.txt中
B、f1.txt和f2.txt均是顺序文件
C、EOF函数可以判断是否已到文件的末尾
D、Close能够把打开的两个文件都关闭
答案
A
解析
Visual Basic程序中关于文件的操作,主要是先打开一个文件,然后对这个文件进行读或写的操作,操作完成后,关闭这个文件。打开文件的基本格式为:Open FileName For Mode As#FileNumbcr。打开方式主要有Output、Append、Input、Random等几种方式。Output、Append、input方式打开的文件进行的读写操作都是以顺序方式进行的,其中Output、Append打开的文件主要用来输出数据,与Print#、Write#等方法配合使用;以Input方式打开的文件主要用来读入数据,它与Input#、Line Input#语句配合使用。Line Input#语句从顺序文件中读取一个完整的行,并把它赋给一个字符串变量。本题中f1.txt和12.txt分别使用Input和Output方式打开,所以都是顺序文件;EOF函数可以判断是否已到文件的末尾,一般用作循环条件;程序的功能是将f1.txt文件的内容复制到t2.txt中,最后的Close语句缺省文件号将会关闭所有的活动文件。
转载请注明原文地址:https://kaotiyun.com/show/DrFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有下面程序代码:OptionBase1PrivateSubCommand1_Click()Dima(10)AsInteger,x,bx=InputBox("请输入一个多位整数")
下列叙述中正确的是
下面能够将某个变量声明为局部变量的是
VisualBasic源程序的续行符为
为了在Form_Load事件过程中用Print方法在窗体上输出指定的内容,首先应执行的操作是
定时器的Interval属性的值是一个整数,它表示的是( )。
在菜单编辑器中建立如下图所示的菜单,并为了每个菜单项编写了鼠标单击事件过程。关于此菜单,以下叙述中错误的是( )。
下列选项中属于面向对象设计方法主要特征的是( )。
下列关于顺序文件的描述中,正确的是( )。
下列运算符中,优先级别最高的是
随机试题
患者,女,34岁。急性化脓性阑尾炎,阑尾切除术后1周,伤口愈合良好。发热,下腹胀痛,大便次数多,6~8次/天,内有黏液,伴有里急后重及尿频、尿急。查体:体温39.2℃,腹略胀,下腹轻度压痛。此患者应诊断为
属于感染性心内膜炎的主要诊断依据()
根据临床应用,心血管系统药物可分为哪几类
根据《环境影响评价技术导则—总纲》,对于环境现状调查的有关参数筛选,应考虑()。
项目持续性分析的要素有()。
气体灭火系统根据其灭火剂种类、灭火机理不同,其适用范围也各不相同。下列火灾中,二氧化碳灭火系统和七氟丙烷灭火系统均可扑灭的火灾有()。
2016年2月,境外公司为我国A企业提供技术咨询服务,含税价款200万元,该境外公司在境内未设立经营机构,也没有境内代理人,则A企业应当扣缴的增值税税额为()。
燕子:植物
参照依赖是指个体基于某个参照点对得失价值进行判断,参照点之上,个体感受是收益,反之感受为损失。损失和收益的感知取决于参照点的选择。根据上述定义,下列不属于参照依赖的是()。
TheMagicX900isbeingadvertisedasthe______computeravailableinstorestoday.
最新回复
(
0
)