[單項選擇題] 某人編寫了向隨機文件中寫一條記錄的程序，代碼如下： Type RType Name As String * 10 Tel As Strin
2021-07-20
[單項選擇題] 某人編寫了向隨機文件中寫一條記錄的程序，代碼如下：
Type RType
Name As String * 10
Tel As String * 20
End Type
Private Sub Command1_Click( )
Dim p As RType
p. Name = InputSox( "姓名" )
p. Tel = InputBox( "電話號" )
Open "Books. dat" For Random As # 1
Put # 1, , p
Close # 1
End Sub
該程序運行時有錯誤，修改的方法是( )。
A． 在類型定義“Type RType”之前加上“Private”
B． Dim P As RType必須置于窗體模塊的聲明部分
C． 應(yīng)把Open語句中的For Random改為For Output
D． Put語句應(yīng)該寫為Put # 1, P. Name, P. Tel
正確答案：A
參考解析：記錄類型的定義必須放在模塊的聲明部分，當(dāng)在標準模塊中定義時，關(guān)鍵字Type前可以有Public(默認)或Private，而如果在窗體模塊中定義，則必須在前面加上關(guān)鍵字Private。Open語句中使用For Random表示文件以隨機方式存取。Put語句的語法為：Put # 文件號，[記錄號]，變量。其中“變量”是除對象變量和數(shù)組變量外的任何變量。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。