文件练习题

单选题

1．关于顺序文件的描述，下面正确的是 ________。

A）每条记录的长度必须相同

B）可通过编程对文件中的某条记录方便地修改C）数据只能以ASCII码形式存放在文件中，所以可通过文本编辑软件显示

D）文件的组织结构复杂

2．关于随机文件的描述，下面不正确的是 ________。

A）每条记录的长度必须相同

B）一个文件的记录号不必唯一

C）可通过编程对文件中的记录方便地修改

D）文件的组织结构比顺序文件复杂

3．按文件的组织方式，文件分为 ________。

A）顺序文件和随机文件 B） ASCII文件和二进制文件

C）程序文件和数据文件 D）磁盘文件和打印文件

4．顺序文件是因为 ________。

A）文件中按每条记录的记录号从小到大排序好的

B）文件中按每条记录的长度从小到大排序好的

C）文件中按记录的某关键数据项从小到大排序好的D）记录按进入的先后顺序存放的，读出也是按原写入的先后顺序读出

5．随机文件是因为 ________。

A）文件中的内容是通过随机数产生的

B）文件中的记录号是通过随机数产生的

C）可对文件中的记录根据记录号随机地读写

D）文件中的记录长度是随机的

6．文件号最大可取的值为 ________。

A） 255 B） 511 C） 512 D） 256

7. Print #1, STR$ 中的Print是 ________。

A）文件的写语句 B）在窗体上显示的方法C）子程序名 D）文件的读语句

8. 为了建立一个随机文件，其中每条记录由多个不同数据类型的数据项组成，应使用 ________。

A）记录类型 B）数组

C）字符串类型 D）变体类型

9. 要从磁盘上读入一个文件名为“c:\t1.txt”的顺序文件，下列________是正确的语句。

A） F = "c:\t1.txt"

Open F For Input As #2

B） F = "c:\t1.txt"

Open "F" For Input As #2

C） Open c:\t1.txt For Input As #2

D） Open “c:\t1.txt” For Output As #2

10. 要从磁盘上新建一个文件名为“c:\t1.txt”的顺序文件，下列________是正确的语句。

A） F = "c:\t1.txt"

Open F For Append As #2

B） F = "c:\t1.txt"

Open "F" For Output As #2

C） Open c:\t1.txt For Output As #2

D） Open “c:\t1.txt” For Output As #2

11. 以下能判断是否到达文件尾的函数是_______。

A）BOF B）LOC C）LOF D）EOF

12. 在顺序文件中______。

A）每条记录的记录号按从小到大顺序

B）每条记录的长度按从小到大顺序

C）按记录的某个关键数据项的排序组织文件

D）记录按写入的先后顺序存放，并按写入的先后顺序读出

13. 假定在窗体(名称为Form1)的代码窗口中定义如下记录类型：

Private Type animal

animalName As String*20

aColor As String*10

End Type

Private Sub Command1_Click()

Dim rec As animal

Open "c:\vbTest.dat" For Random As #1 Len=len(reC）

rec.animalName="Cat"

rec.aColor="White"

Put #1,,rec

Close #1

End Sub

则以下叙述中正确的是______。

A）记录类型animal不能在Form1中定义，必须在标准模块中定义

B）如果文件c:\vbTest.dat不存在，则Open命令执行失败

C）由于Put命令中没有指明记录号，因此每次都把记录写到文件的末尾

D）语句“Put #1,,rec”将animal类型的两个数据元素写到文件中

14. 在随机文件中______。

A）记录号是通过随机数产生的

B）可以通过记录号随机读取记录

C）记录的内容是随机产生的

D）记录的长度是任意的

15. 在窗体上有一个文本框，代码窗口中有如下代码，则下述有关该段程序代码所实现的功能的错误的说

法是______。

Private Sub form_load()

Open "C:\data.txt" For Output As #3

Text1.Text = ""

End Sub

Private Sub text1_keypress(keyAscii As Integer)

If keyAscii = 13 Then

If UCase(Text1.Text) = "END" Then

Close #3

End

Write #3, Text1.Text

Text1.Text = ""

End If

End If

End Sub

A）在C盘当前目录下建立一个文件

B）打开文件并输入文件的记录

C）打开顺序文件并从文本框中读取文件的记录，若输入End则结束读操作

D）在文本框中输入的记录按回车键存入，然后文本框内容被清除

16. 执行语句Open"C:StuData.dat"For Input As #2后，系统______。

A）将C盘当前文件夹下名为StuData.dat的文件的内容读入内存

B）在C盘当前文件夹下建立名为StuData.dat的顺序文件

C）将内存数据存放在C盘当前文件夹下名为StuData.dat的文件中

D）将某个磁盘文件的内容写入C盘当前文件夹下名为StuData.dat的文件中

17. 如果在C盘当前文件夹下已存在名为StuData.dat的顺序文件，那么执行语句

“Open"C：StuData.dat"For Append As #1”之后将 ______。

A）删除文件中原有的内容

B）保留文件中原有的内容，可在文件尾添加新内容

C）保留文件中原有内容，在文件头开始添加新内容

D）以上均不对

18. 以下关于文件的叙述中，错误的是______。

A）使用Append方式打开文件时，文件指针被定位于文件尾

B）当以输入方式(Input)打开文件时，如果文件不存在，则建立一个新文件

C）顺序文件各记录的长度可以不同

D）随机文件打开后，既可以进行读操作，也可以进行写操作

19. 为了把一个记录型变量的内容写入文件中指定的位置，所使用的语句的格式为______。

A）Get文件号，记录号，变量名 B）Get文件号，变量名，记录号

C）Put文件号，变量名，记录号 D）Put文件号，记录号，变量名

20. 执行语句Open " Tel.dat" For Random As #1 Len = 50后，对文件Tel.dat中的数据能够执行的操