[單項選擇題] 窗體上有兩個名稱分別為Text1、Text2的文本框，一個名稱為Command1的命令按鈕。設(shè)有如下的類型聲明： Type Person name As String*8 major As String*20 End Type 當(dāng)單擊“Command1”按鈕時，能夠正確地把數(shù)據(jù)寫入文件的程序段是______。

A．Private Sub Command1_Click() Dim p As Person name=Text1. Text major=Text2. Text Open"C:dat dat" For Random As #1 Put #1, 1, p Close #1 End Sub

B．Private Sub Command1_Click() Dim p As Person name=Text1.Text major=Text2. Text Open"C:dat dat" For Random As #1 Get #1, 1, p Close #1 End Sub

C．Private Sub Command1_Click() Dis p As Person name=Text1. Text major=Text2. Text open "C:dat dat" For Random As #1 Len=Len( Put #1, 1, p Close #1 End Sub

D．Private Sub Command1_Click() Dim p As Person name=Text1. Text major=Text2. Text Open "C:dat dat" For Random As #1=Len( Get #1, 1, p Close #1 End Sub

C

[分析] 以隨機(jī)方式打開的隨機(jī)文件的寫操作是通過Put語句實現(xiàn)的，其格式為： Put#文件號，[記錄號]，變量 這里的“變量”是除了對象變量和數(shù)組變量之外的任何變量(包括含有單個數(shù)組元素的下標(biāo)變量)。Put語句把“變量”的內(nèi)容寫入由“文件號”所指定的磁盤文件中。