有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。 Private Sub Form_Click() Dim x As Single,y As Single Open "NM1.txt" For Input As#1 Open "NM2.txt" For Input As#2 Do While Not EOF(1) [14] Print x y=x^2 [15] Print y Loop Close #1,#2 End Sub