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

admin2016-09-18  35

问题 以下事件过程的功能是:从已存在于磁盘上的顺序文件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://jikaoti.com/ti/S0J0FFFM
0

最新回复(0)