[填空題] 下列事件過(guò)程的功能是：建立一個(gè)名為Datal的隨機(jī)文件，存放角度值及這些角度的正弦函數(shù)值和余弦函數(shù)值，角度為1，2，3，…，90。請(qǐng)?jiān)诳瞻滋幪钊脒m當(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 SubForm_Click()

Dim Y As Single

Open 【10】

Y=3.14159/180

For i=1 To 90

Ksc.K=i

Ksc.Sinx=Sin(i*Y)

Ksc.Cosx=Cos(i*Y)

【11】

Next i

Close #2

End Sub

[10]“C：Datal.txt”For Random As #Len_=10 [11]Put #2，i，Ksc

第1個(gè)空白行已經(jīng)告訴我們是打開(kāi)文件的語(yǔ)句，現(xiàn)在要將它填寫(xiě)完整。該語(yǔ)句應(yīng)確定文件的存取方式是隨機(jī)存取。在自定義變量中，有3成員，其中角度為整型數(shù)據(jù)，占2個(gè)字節(jié)；弦和余弦函數(shù)值為單精度類(lèi)型，各占4個(gè)字節(jié)，故文件的記錄占10個(gè)字節(jié)。若不指定Len參數(shù)，則隱含一個(gè)記錄占128字節(jié)。為了節(jié)省存儲(chǔ)空間，可在Open語(yǔ)句中指寫(xiě)Len參數(shù)值。程序中沒(méi)有將數(shù)據(jù)寫(xiě)入隨機(jī)文件的語(yǔ)句，第2個(gè)空白行應(yīng)是 Put語(yǔ)句。