[填空題] 下列程序?qū)崿F(xiàn)的功能是：當(dāng)在窗體上單擊時，從鍵盤上讀入5個學(xué)生的學(xué)號、姓名、英語成績并存入到文件d：stu1.dat中，然后從文件中讀出第3個人的學(xué)號、姓名和英語成績并顯示在窗體中。Type student No As Long Name As String * 20 English As IntegerEnd TypePrivate Sub form_ Click () Dim k As student, i As Integer【8】 Open "d:stu1. dat" for Random As #10 Len = Reclen for i = 1 To 5 k. No= InputBox(“請輸入學(xué)號”) k. Name = InputBox (“請輸入姓名”) k. English= InputBox (“請輸入英語成績”) 【9】 Next i【10】 Print k. No; k. Name; k. English Close #10End Sub

[8]Reclen=Len(k)

[9]Put #10 i，k[10]Get #10，3，k 本題中定義了一個記錄類型Student，并通過一個循環(huán)讀入5條記錄型數(shù)據(jù)存放到指定的文件中去，因此文件的存取方法應(yīng)是隨機存取方式。從打開文件的Open語句可以看到有一個變量RecLen應(yīng)是寫入文件中的記錄長度，在該語句的前面應(yīng)給該變量賦值，故[8]處應(yīng)填“Reclen= Len(k)”。在循環(huán)中每讀入一個記錄型的變量值，應(yīng)立即把該變量寫到文件中去，應(yīng)使用Put語句，故在[9]處應(yīng)填“Put #10，i，k”。要讀出隨機文件中的某條記錄，可使用Get語句，故在[10]處應(yīng)填“Get #10，3，k”。