下面的程序执行时,将把当前目录上的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Text1.Text="" Open ".smtext1.txt"______As1 Do While______ Input 1,inData Text1.Text=Text1
主观题
下面的程序执行时,将把当前目录上的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。请填空。 Private Sub Command1_Click() Dim inData As String Text1.Text="" Open ".smtext1.txt"______As1 Do While______ Input 1,inData Text1.Text=Text1