（34）下列事件過程的功能是：建立一個名為Data1的隨機(jī)文件，存放角度值及這些角度的正弦函數(shù)值和余弦函數(shù)值，角度為1,2,3，…，90。請在空白處填入適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。 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 Ang Open Y=3.14159/180 For i=1 To 90 Ksc.K=i Ksc.Sinx=Sin(i*Y) Ksc.Cosx=Cos(i*Y) ___________ Next i Close #2 End SubA."‥\Datal.txt"For Random As#1 Len=10 Put#1,i,KscB."‥\Datal.txt"For Random As#1 Len=10 Put#1,Y,Ksc C."‥\Datal.txt"For Random As#1 Put#1,i,KscD."‥\Datal.txt"For Random As#1 Put#1,Y,Ksc

A【解析】分析程序，程序要將角度值及這些角度的正弦函數(shù)值和余弦函數(shù)值存入Data1文件中。因此，應(yīng)先打開Data1文件，應(yīng)為Data1文件是隨機(jī)文件，要新建并寫入信息，所以應(yīng)用Random方式打開文件。這里給隨機(jī)文件指定長度為10，所以第1個空白處應(yīng)填："..\Data1.txt" For Random As #1 Len=10。要向隨機(jī)文件中寫入信息，應(yīng)用Put語句，因此第2空應(yīng)填：Put #1,i,Ksc。