有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。 Private Sub Form_Click() Dim x As Single,y As SingleOpen "NM1.txt" For Input As 1Open "NM2.txt "For Input As 2Do While
主观题
有一个事件过程,其功能是:从已存在于磁盘上的顺序文件NM1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件NM2.txt中。请填空。 Private Sub Form_Click() Dim x As Single,y As SingleOpen "NM1.txt" For Input As 1Open "NM2.txt "For Input As 2Do While