问题详情

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


请帮忙给出正确答案和分析，谢谢！