以下事件过程的功能是:从已存在于磁盘上的顺序文件Num1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是( )。 Private Sub Form_Click() Dim x

admin2015-05-30  34

问题 以下事件过程的功能是:从已存在于磁盘上的顺序文件Num1.txt中读取数据,计算读出数据的平方值,将该数据及其平方值存入新的顺序文件Num2.txt中。则在以下横线处合适的语句是(    )。
Private Sub Form_Click()
Dim x As Single,y As Single
Open"Num1.txt"For Input As#1
Open"Num2.txt"For Output As#2
Do While Not EOF(1)
________
Print x
y=x^2
________
Print y
Loop
Close#1,#2
End Sub

选项 A、Input#1,y     Print#2,x,y
B、Input#2,X Print#1,x,y
C、Print#1,x  Input#2,x,y
D、Input#1,x Print#2,x,y

答案D

解析 本题考查顺序文件的操作。打开文件Num1和文件Num2,文件号为1和2。如果1号文件不为空,则利用Input读出数据,Input使用格式为:Input#文件号,变量列表。计算平方以后,利用Print将信息结果写入到2号文件中,Print的使用格式为:Print#文件号,[输出列表]。
转载请注明原文地址:https://kaotiyun.com/show/G3Qp777K
0

最新回复(0)