vb文件 练习题(含答案)

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

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

B) 可通过编程对文件中的某条记录方便地修改

C) 数据只能以ASCII码形式存放在文件中，所以可通过文本编辑软件显示

D) 文件的组织结构复杂

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

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

3．按文件的访问方式，文件分为________。

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

C) 程序文件、随机文件和数据文件D) 磁盘文件和打印文件

4．顺序文件是因为________。

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

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

C) 文件中按记录的某关键数据项从小到大排序好的

D) 记录按进入的先后顺序存放的，读出也是按原写入的先后顺序读出

5．在窗体上有一个文本框，代码窗口中有如下代码，则下述有关该段程序代码所实现的功能的正确的说法是______。

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

Else

Write #3, Text1.Text

Text1.Text = ""

End If

End If

End Sub

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

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

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

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

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

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

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

A) 文件的写语句B) 在窗体上显示的方法

C) 子程序名D) 文件的读语句

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

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

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

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 Input 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. 如果在C盘当前文件夹下已存在名为StuData.dat的顺序文件，那么执行语句“Open"C：StuData.dat"For Append As #1”之后将______。

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

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

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

D）以上均不对

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

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

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

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

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

13. 以下程序段实现的功能是______。

Option Explicit

Sub appeS_file1()

Dim StringA As String, X As Single

StringA="Appends a new number:"

X=-85

Open "d:\S_file1.dat" For Append As #1

Print #1, StringA; X

Close

End Sub

A）建立文件并输入字段B）打开文件并输出数据

C）打开顺序文件并追加记录D）打开随机文件并写入记录

14. 在窗体上画一个名称为Command1的命令按钮和一个名称为Text1的文本框,在文本框中输入以下字符串: Microsoft Visual Basic Programming

然后编写如下事件过程:

Private Sub Command1_Click()

Open "d:\temp\outf.txt" For Output As #1

For i = 1 To Len(Text1.Text)

c = Mid(Text1.Text, i, 1)

If c >= "A" And c <= "Z" Then

Print #1, LCase(C）

End If

Next i

Close

End Sub

程序运行后,单击命令按狃,文件outf.txt中的内容是______。

A）MVBP B）mvbp

C）M D）m

V v

B b

P p

答案：