[單項選擇題] 窗體上有兩個名稱分別為Text1、Text2的文本框，一個名稱為Command1的命令按鈕。設(shè)有如下的類型聲明：

Type Person

name As String *8

major As String*20

End Type

當單擊"保存"按鈕時，將兩個文本框中的內(nèi)容寫入一個隨機文件C：Testl.dat中。設(shè)文本框中的數(shù)據(jù)已正確地賦值給Person類型的變量p。則能夠正確地把數(shù)據(jù)寫入文件的程序段是______。

A． Open "c: Test1.dat" For Random As#1

Get #1 ,1 ,p

Close#1

B． Open "c: Test1.dat" For Random As#1 Len=

Len(p)

Get #1,1,p

Close #1

C． Open "c:Test1.dat" For Random As#1

Put #1,1,p

Close #1

D． Open "c:Test1.dat" For Random As#1 Len=

Len(p)

Put #1 ,1 ,p

Close #1

D

隨機文件又稱直接文件，由若干個記錄組成，每個記錄的長度都是固定的，并且每個記錄都有一個記錄號，因此可以根據(jù)記錄號訪問隨機文件的任意記錄。注意：當用Open語句打開一個隨機文件的時候，如果指定存取類型為讀寫類型，則可以任意讀寫該文件；如果指定存取類型為只讀類型，則只能進行讀操作；如果指定存取類型為只寫類型，則只能進行寫操作。要打開隨機訪問的文件，Open語句使用以下語法：Open pathname[For Random] As filenumber Len=rec-length。把變量寫入記錄是使用Put語句把記錄添加或者替換到隨機型訪問打開的文件。所以本題答案為D) 。