窗体上有一个名称为Command1的命令按钮,一个名称为List1的列表框。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open "c:\f1.txt" For Input As #1 Do Wh

admin2015-10-23  31

问题 窗体上有一个名称为Command1的命令按钮,一个名称为List1的列表框。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
    Open "c:\f1.txt" For Input As #1
    Do While Not EOF(1)
        Input #1, str1
        List1.AddItem str1
    Loop
    Close
End Sub
对于上述程序,以下叙述中错误的是

选项 A、以输入方式打开随机文件f1.txt
B、Close的作用是关闭已经打开的数据文件
C、单击命令按钮后,把f1.txt中的所有内容添加到列表框中
D、运行程序后,列表框中的列表项都是f1.txt中的记录

答案A

解析 FreeFile函数返回一个整数,即下一个可供OPEN语句使用的文件号,EOF函数用来返回测试文件的结束状态,对于顺序文件来说,如果已达到文件尾,则函数返回值为True,否则返回值为False。利用EOF函数,可以避免在文件输入时出现"输入超出文件尾"的错误。EOF(1)的含义是已到达文件号为1的文件尾,Not EOF(1)的含义是没有到达文件号为1所对应文件的末尾。
    Open语句兼有打开文件和建立文件两种功能。题目中采用Input方式打开文件,指定文件顺序输入方式,故Open打开的是顺序文件。故A项错误。Close作用是关闭一个文件,在本题中作用是关闭已经打开的数据文件,故B选项表述正确。Input是从一个顺序文件中读出一个数据项,并把它赋值给一个变量。Input #1, str1和List1.AddItem str1两个语句通过str1,将文件中的一个数据项添加到List1中,如此循环,直到文件末尾,程序运行结束, f1.txt中的所有内容被添加到列表框中,列表框中的列表项都是f1.txt中的记录。故C,D项表述正确。
转载请注明原文地址:https://jikaoti.com/ti/wIJ0FFFM
0

最新回复(0)