在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text=" " Open "d:Myfile.txt" For (14) As1 Do While (15) Input1,inData Text1.Text=Text1.Text+i
主观题
在窗体上画一个命令按钮和一个文本框,其名称分别为Command1和Text1,然后编写如下事件过程: Private Sub Command1_Click() Dim inData As String Text1.Text=" " Open "d:Myfile.txt" For (14) As1 Do While (15) Input1,inData Text1.Text=Text1.Text+i