问题
填空题
下列事件过程的功能是:建立一个名为Datal的随机文件,存放角度值及这些角度的正弦函数值和余弦函数值,角度为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
Open“c:\Datal.txt”For Random As #2 Len=10
Y=3.14159/180
For i=1 To 90
Ksc.K=i
Ksc.Sinx=Sin(i * Y)
Ksc.Cosx=Cos(i * Y)
______
Next
Close #2
End Sub
答案
参考答案:“C:\Datal.txt”For Random As #2 Len=10
解析: 打开一个随机文件的一般格式为:“Open”文件名称”For Random As#文件号[Len=记录长度]”