[填空題] 在窗體上畫(huà)一個(gè)文本框，其名稱(chēng)為T(mén)ext1，在屬性窗口中把該文本框的MultiLine屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下的事件過(guò)程： Private
2021-07-20
[填空題] 在窗體上畫(huà)一個(gè)文本框，其名稱(chēng)為T(mén)ext1，在屬性窗口中把該文本框的MultiLine屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下的事件過(guò)程： Private Sub Form_Click() Open "d:estsmtext1.Txt" For Input As #1 Do While Not （） Line Input #1, aspect$ Whole$=whole$+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ （） Open "d:estsmtext2.Txt" For Output As #1 Print #1, （） Close #1 End Sub 運(yùn)行程序，單擊窗體，將把磁盤(pán)文件smtext1.txt的內(nèi)容讀到內(nèi)存并在文本框中顯示出來(lái)，然后把該文本框中的內(nèi)容存入磁盤(pán)文件smtext2.txt。請(qǐng)?zhí)羁铡?/p>正確答案：
EOF（1）；Close#1；Text1.Text或Text1
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢(xún)相關(guān)領(lǐng)域?qū)I(yè)人士。