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

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

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

Private Type Ang

K As Integer

Sinx As Single

Cosx As Single

End Type

______ ’定义Ang类型的变量Ksc

Private Sub Form Click()

Dim Y As Single

Open "C:Data1.txt" For Random As #1 Len=10

Put #1,1,Ksc

Y=3.14159/180

For i=1 To 90

Ksc.K=i

______=Sin(i*Y)’给变量Ksc的正弦函数值赋值

Ksc.Cosx=Cos(i*Y)

Next i

Close #1

End Sub

正确答案：

Dim Ksc As Ang Ksc.Sinx

参考解析：

声明用户定义类型的变量格式为：Dim 变量名 as 用户定义类型名；定义了记录类型后，给该类型变量赋值时用“变量名.元素=要赋的值”的格式进行赋值。