阅读下面一段VisualBasic。程序:在窗体上建立一个文本框,其名称为Textl,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: PrivateSubForm(Clicko Open"d:\test\smtext

admin2012-08-25  29

问题 阅读下面一段VisualBasic。程序:在窗体上建立一个文本框,其名称为Textl,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:
PrivateSubForm(Clicko
Open"d:\test\smtextl.txt’’ForInputAs#1
DoWhileNot(①
LineInpul:#1,aspect$
whole!$=whole$+aspect$+Chr$(13)+Chr$(10)
Loop
Textl.Text=whole$
Close#1
Open"d:\test\smtext2.txt’ForOutputAs#1
Printg1,②
Close#1
EndSub
上述程序的功能是:把磁盘文件smtext.1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件smtext2,txt。请完成①②空。

选项

答案EOF(1)Textl.text(或Textl或who1e或who1e$)

解析
转载请注明原文地址:https://kaotiyun.com/show/awKv777K
0

最新回复(0)