[填空題] 在窗體上畫(huà)一個(gè)文本框，名稱為T(mén)ext1，畫(huà)一個(gè)命令按鈕，名稱為Command1。程序運(yùn)行時(shí)，單擊命令按鈕，能將事先輸入文本框中的內(nèi)容一個(gè)字符一個(gè)字符
2021-07-20
[填空題] 在窗體上畫(huà)一個(gè)文本框，名稱為T(mén)ext1，畫(huà)一個(gè)命令按鈕，名稱為Command1。程序運(yùn)行時(shí)，單擊命令按鈕，能將事先輸入文本框中的內(nèi)容一個(gè)字符一個(gè)字符地寫(xiě)入順序文件test.dat中。請(qǐng)?jiān)诳崭裉幪钌线m當(dāng)?shù)膬?nèi)容，將程序補(bǔ)充完整。
Private Sub Command1_Click()
Open"c:est.dat"For Output As#1
Fori=1 to Len(Text1.Text)
(12)
Next
Close# i
End Sub
正確答案：Print#A,Mid(TextA.Text,i,A)
參考解析：Print#語(yǔ)句的功能是，把數(shù)據(jù)寫(xiě)入文件中。其格式為：Print#文件號(hào)，[[Spc(n)|Tab(n)][表達(dá)式表][；|，]]。本題要將文本框中的內(nèi)容一個(gè)字符一個(gè)字符地寫(xiě)入順序文件，用Mid函數(shù)取字符，所以本題答案是Print#1，Mid(Text1.Text，i，1)。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。