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

19 查阅

[填空题] 下列事件过程的功能是：建立一个名为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 【15】

Y=3. 14159 / 180

For i=1 To 90

Ksc. K=i

Ksc. Sinx = Sin ( i * Y)

Ksc. Cosx = Cos ( i * Y)

Put #2, i, Ksc

Next i

Close #2

End Sub

参考答案:

“C:Datal.txt”For Random As #2 Len=10

打开一个随机文件的一般格式为：Open“文件名称”For Random As# 件号[Len=记录长度]