填空题

以下程序的功能是:将当前目录下的顺序文件mText1.txt的内容读入内存,并在图片框 Picture1中显示出来。请完善程序。 Private Sub Command1_Click() Dim inData As String Open ".\mText1.txt" 【13】 As 1 Do While Not EOF(1) Input #1,inData Picture1.Print inData Loop Close #1 End Sub

【参考答案】

ForInput