有一个事件过程 其功能是：从已存在于磁盘上的顺序文件NMl．txt中读取数据 计算读 出数据的平方值
有一个事件过程，其功能是：从已存在于磁盘上的顺序文件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
请帮忙给出正确答案和分析，谢谢！
参考解答
435***264
2023-07-22 08:06:56
正确答案：Input #1x Print #2xy
本题考查顺序文件的读写操作，事件过程中，顺序文件的打开和关闭语句都正确。循环语句使用也正确。事件过程的功能是：从NM1．txt中读取数据，向NM2．txt中写人数据。程序中没有对数据文件进行读写的语句，故空白处要填写的正是对顺序文件读数据和写数据的语句。
相似问题
在窗体上画一个文本框和—个图片框 然后编写如下两个事件过程： Private Sub Form_Cl
在窗体上画一个文本框和—个图片框，然后编写如下两个事件过程： Private Sub Form_Click() Text1 Text="VB程序设计" End Sub Private Sub Text
下列程序是判断一个整数(>=3)是否为素数 请补充完整。 Dim n As Integer n=In
下列程序是判断一个整数(>=3)是否为素数，请补充完整。 Dim n As Integer n=InputBox("请输入一个整数(>=3)") k=Int(Sqr(n)) i=2 swit=0 While
当对象得到焦点时 会触发【 】事件 当对象失去焦点时将触发【 】事件。请帮忙给出正确答案和分析 谢谢
当对象得到焦点时，会触发【 】事件，当对象失去焦点时将触发【 】事件。请帮忙给出正确答案和分析，谢谢！
下列程序的输出结果为【 】。 num=2 While num
下列程序的输出结果为【 】。 num=2 While num<=3 num=num+1 Print num Wend请帮忙给出正确答案和分析，谢谢！
为了在按下Esc键时执行某个命令按钮的事件过程 需要把该命令按钮的一个属性设置为True 这个属性是
为了在按下Esc键时执行某个命令按钮的事件过程，需要把该命令按钮的一个属性设置为True，这个属性是【 】。请帮忙给出正确答案和分析，谢谢！
