填空题 在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text="" Open"d:/myfile.txt" For{{U}} 【14】 {{/U}}As#1 Do While{{U}} 【15】 {{/U}} Input #1,inData Text1.Text=Text1.Text+inData Loop Close#1 End Sub 程序的功能是,打开D盘根目录下的文本文件myfile.txt,读取它的全部内容并显示在文本框中。请填空。
  • 1、
【正确答案】 1、[14] Input    
【答案解析】[15] Not EOF(1) [评析] Open语句使用以下语法: Open pathname For [Input|Output|Append] As filenumber [Len=buffersize] 当打开顺序文件作为Input时,该文件必须已经存在,否则会产生一个错误。 EOF()函数判断文件是否结束。该程序对指定路径下的文件进行Input操作,由于是遍历整个文件,则最后的EOF(1)必为真。