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

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ī)方式打開(kāi)的隨機(jī)文件的寫(xiě)操作是通過(guò)Put語(yǔ)句實(shí)現(xiàn)的，其格式為： Put#文件號(hào)，[記錄號(hào)]，變量 這里的“變量”是除了對(duì)象變量和數(shù)組變量之外的任何變量(包括含有單個(gè)數(shù)組元素的下標(biāo)變量)。Put語(yǔ)句把“變量”的內(nèi)容寫(xiě)入由“文件號(hào)”所指定的磁盤文件中。