(10 ) 在窗体上画一个文本框 其名称为 Text1 在属性窗口中把该文本框的 Mult i Line 属性设

计算机 属性,窗体,其名 已帮助 人

(10 ) 在窗体上画一个文本框 , 其名称为 Text1 , 在属性窗口中把该文本框的 Mult i Line 属性设置为 True ,然后编写如下的事件过程:

Private Sub Form_Click ()

Open " d: estsmtext1.Txt " For Input As #1

Do While Not 【 13 】

Line Input #1, aspect$

W hole$=whole$+aspect$+Chr$ (13 ) +Chr$ (10 )

Loop

Text1.Text=whole$

【 14 】

Open " d: estsmtext2.Txt " For Output As #1

Print #1, 【 15 】

Close #1

End Sub

运行程序 , 单击窗体 , 将把磁盘文件 smtext1.txt 的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件 smtext2.txt 。请填空。

热搜:列表框控件list1的最后一个表项