下列事件过程的功能是：建立一个名为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

计算题：一台单相电动机，由220V电源供电，电路中的电流是11A，，试求电动机的视在功率，有功功率和无功功率。