题目内容
把一个磁盘文件的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存人另一个磁盘文件,请填空完成程序。在窗体上建立一个文本框,在属性窗口中把该文本框的Muhiline属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() Open"d:\test\smtext1.txt"For lnput As1 Text1.Fontsize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【 】 whole$=whole $ aspect $+Chr$(13)+Chr $(10) Loop Text1.Text=【 】。 Close Open"d:\test\smtexttxt"For Output As1 Print 1【 】 Close End Sub
查看答案
搜索结果不匹配?点我反馈