[填空題] 建立隨機(jī)文件TEST.DAT，存放學(xué)生的姓名和總分，然后把該文件中的數(shù)據(jù)讀出來顯示。請?jiān)?u> 【10】 和 【11】 處填適當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整，

Type Record

Student As String*20

Score As Single

End Type

Dim Class As Record

Open"TEXT.DAT"For 【10】 As #1 Len=Len(Class)

Class.Student=“LiuMin”：Class.Score=596

Put #1，1，Class

Close #1

Open"TEXT.DAT"For Random As #1 Len(Class)

【11】

Print"STUDENT："，Class.Student

Print"SCORE："，Class.Score

Close #1

End

[10] Random [11] Get #1，1，Class

對于[10]，首先用Type函數(shù)定義一個記錄類型數(shù)據(jù)Record，然后定義Class變量為Record。用Open語句打開隨機(jī)文件時，F(xiàn)or后面應(yīng)填Random，表示以隨機(jī)方式打開文件。 [11] 處由于要執(zhí)行讀操作，故使用Get#語句。Get#語句后接三個參數(shù)，分別表示文件號、記錄號、變量。由于這是與上一步Put#語句相反的操作，故參數(shù)都一樣，分別為1、 1、Class。故對于[11]處填Get#1，1，Class。