[单项选择题] 下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整( )。

[单项选择题] 下列事件过程的功能是：建立一个名为Data1的随机文件，存放角度值及这些角度的正弦函数值和余弦函数值，角度为1，2，3，…，90。请在空白处填入适当的内容，将程序补充完整( )。 Private Type Ang K As Integer Sinx As Single Cosx As Single End Type Dim Ksc As Ang Private Sub Form_Click() Dim Y As Single Dim i AS Integer Dim Ksc As AngOpen ______Y=3.14159/180For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) ______Next iClose #2 End Sub

A．"..Data1.txt" For Random As #1 Len=10 Put #1,i,Ksc
B．"..Data1.txt" For Random As #1 Len=10 Put #1,Y,Ksc
C．"..Data1.txt" For Random As #1 Put #1,i,Ksc
D．"..Data1.txt" For Random As #1 Put #1,Y,Ksc

参考答案：

A

问题解析:

分析程序，程序要将角度值及这些角度的正弦函数值和余弦函数值存入Data1文件中。因此，应先打开Data1文件，应为Data1文件是随机文件，要新建并写入信息，所以应用Random方式打开文件。这里我们给随机文件指定长度为10，所以第1个空白处应填： "..Data1.txt" For Random As #1 Len=10。要向随机文件中写入信息，应用Put语句，因此第2空应填；Put #1，i，Ksc。