在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private Sub Form_Click（）Open "d:\test\smtext1.txt" For Input As #1Do While Not ______Line Input #1, aspect$whole$ = whole$ + aspect$ + Chr$（13） + Chr$（10）LoopText1.Text = whole$Close #1Open "d:\test\smtext2.txt" For Output As #1Print #1, ______Close #1End Sub上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。
在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：
Private Sub Form_Click（）
Open "d:\test\smtext1.txt" For Input As #1
Do While Not ______
Line Input #1, aspect$
whole$ = whole$ + aspect$ + Chr$（13） + Chr$（10）
Loop
Text1.Text = whole$
Close #1
Open "d:\test\smtext2.txt" For Output As #1
Print #1, ______
Close #1
End Sub
上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。请填空。
相关考题：
在窗体上画一个文本框，其名称为Text1。为了在程序运行后Text1中的文本不可编辑，应当使用的语句： ______。A．Text1.ClearB．Text1.Locked=TrueC．Text1.Visible=FalseD．Text1.Enabled=True
（ 10 ） 在窗体上画一个文本框 ， 其名称为 Text1 ， 在属性窗口中把该文本框的 Mult i Line 属性设置为 True ，然后编写如下的事件过程：Private Sub Form_Click （）Open " d:\test\smtext1.Txt " For Input As #1Do While Not 【 13 】Line Input #1, aspect$W hole$=whole$+aspect$+Chr$ （ 13 ） +Chr$ （ 10 ）LoopText1.Text=whole$【 14 】Open " d:\test\smtext2.Txt " For Output As #1Print #1, 【 15 】Close #1End Sub运行程序 ， 单击窗体 ， 将把磁盘文件 smtext1.txt 的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件 smtext2.txt 。请填空。
在名为Form1的窗体上绘制一个文本框，其名称为Text1。编写适当的事件过程，程使序运行后，若单击窗体，则可使文本框移到窗体的左上角；而如果在文本框中输入信息，则可使文本框移到窗体的右上角。程序的运行情况如下图所示。注意：不得使用任何变量，只允许通过修改属性的方式移动文本框：文件必须存放在考生文件夹中，工程文件名为execise112.vbp，窗体文件名为execise112.frm。
在名称为Form1的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private Sub Form. Click()Open "d：\test\smtext1.txt" For Input As 1Do While NotLine Input 1，aspectswhole$=whole$+aspect$+Chr$(13)+Chr$(10)LoopText1.Text=whole$Close 1Open "d：\test\smtext2.txt" For Output As 1Print 1, ______Close 1End Sub上述程序的功能是，把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtext2.txt。
创建名称为Form1的窗体，在该窗体上画一个文本框，名称为Text1，文本框中初始内容为Visual Basic。在文本框的右边画一个垂直滚动条，名称为VScrolll。滚动条的高度为 3000，宽度为375。在图片框的下方画一个命令按钮，名称为Command1，标题为“清除”。文本框的宽度为2000，高度为600，如图3所示。编写一个事件过程，使程序运行后，单击“清除”按钮，文本框中的文字被清除。程序中不得使用任何变量。注意：存盘时必须存放在考生文件夹下，工程文件名为ylcl.vbp，窗体文件名为ylcl.frm。
请根据以下各小题的要求设计Visaul Basic应用程序(包括界面和代码)。1．在窗体(名称为Form1)上画1个列表框(名称为L1)和1个水平滚动条(名称为HS1，Min属性为0，Max属性为100，SmallChange属性为2，LargeChange属性为10)，编写适当的事件过程。程序运行后，如果把滚动框移到某个位置，然后单击窗体，则在列表框中显示“滚动条的当前值是：xx”，如图1—1所示，其中xx是滚动框所在的位置。存盘时，工程文件名为sjt1.vbp，窗体文件名为sjt1.frm。2．在名称为Form1的窗体上画一个文体框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能：1)在文本框中可以显示多行文本2)在文本框中显示垂直滚动条3)文本框中显示的初始信息为“程序设计”4)在文本框中显示的字体为三号规则黑体5)窗体的标题为“设置文本框属性”。完成设置后的窗体如图1—2所示。要求：不编写任何代码。注意：存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
在名称为Forml的窗体上绘制一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后编写如下的事件过程：Private SUb Form_CnCk()Open"d:\tes\smtext1.txt"For Input AS 1Do While Not EOF(1)Line Iput 1,aspect$whole$=whole$+aspect$+Chf$(13)+Chr$(10)Loop
在名为Form1的窗体上绘制一个文本框，其名称为Text1，然后通过属性窗口设置窗体和文本框的属性，实现如下功能：(1)在文本框中可以显示多行文本；(2)在文本框中显示垂直滚动条。(3)文本框中显示的初始信息为“计算机等级考试”。(4)文本框中显示的字体为三号规则黑体。(5)窗体的标题为“设置文本框属性”。完成设置后的窗体如下图所示。注意：不编写任何代码：文件必须存放在考生文件夹中，工程文件名为execise71.vbp，窗体文件名为execise71.frm。
在窗体上画一个文本框(其名称为Text1)和一个标签(其名称为Labe11)，程序运行后，如果在文本框中输入指定的信息，则立即在标签中显示相同的内容。以下可以实现上述操作的事件过程是( )。A．B．C．D．