[填空题] 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程:Private Sub Command1_Click()Dim inData A

[填空题] 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程:Private Sub Command1_Click()Dim inData A,第1张

[填空题] 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData A

[填空题] 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程:

Private Sub Command1_Click()

Dim inData As String

Text1.Text=" "

Open "d:Myfile.txt" For (14) As#1

Do While (15)

Input#1,inData

Text1.Text=Text1.Text+inData

Loop

Close#1

End Sub

程序的功能是,打开D盘跟目录下的文本文件Myfile.txt,读取它的全部内容并显示在文本框中,请填空。

正确答案:

Not EOF(1)

参考解析:

本题主要考察顺序文件的打开。打开顺序文件的基本格式是:Open FileName For Mode As #FileNumber。其中FileName表示要打开的文件的路径;Mode为打开模式:OutPut用于输出、Append用于追加写入、Input用于读取;FileNumber为打开文件时指定的句柄(即文件号)。在读文件时,经常用Do While循环和Input#语句读出数据,以Not EOF(文件号)为循环条件,EOF(文件号)用于判断是否读到文件结尾。

欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/zaji/5625661.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2022-12-16
下一篇 2022-12-15

发表评论

登录后才能评论

评论列表(0条)

保存