[填空题] 窗体上有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运行后，如果单击命令按钮，则可打开磁盘文件c:est.txt，并将文件中的内容(多行文本) 显示在文

时间：2021-07-20 17:57:05 解答: 78 次

[填空题] 窗体上有名称为Command1的命令按钮及名称为Text1、能显示多行文本的文本框。程序运行后，如果单击命令按钮，则可打开磁盘文件c:est.txt，并将文件中的内容(多行文本) 显示在文本框中。下面是实现此功能的程序，请填空。Private Sub Command1_Click()Text1=""Number=FreeFileOpen "c:est.txt" For Input As NumberDo While NotEOF( [14] )Line Input #Number，sText1.Text=Text1.Text+ [15] +Chr(13)+Chr(10)LoopClose NumberEnd Sub

正确答案：

[14] Number[15] s

参考解析：

EOF函数的格式为EOF(文件号)，用于测试文件指针是否到达文件末尾，因此第14个空应填文件号Number； Line函数返回文件中一行的数据，要将文件中的内容在文本框中显示，就要用Text1.Text连接上。再接回车键换行，所以第15个空应该填文件中的内容s。

本文链接：https://www.waksw.com/5xk6ekdp0h.html

上一篇：[单项选择题] 在窗体上添加一命令按钮，其名为Command1，然后编写代码如下。 private Sub Command1_Click() Dim arr(5)As Integer，arr1(5

下一篇：[单项选择题] 类Test定义如下，将下列哪个方法插入行③处是不合法的　　　①　public class Test {　　　②　　　public float Method(float a，float