[填空题] 在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空

时间：2021-07-20 18:26:52 解答: 82 次

[填空题] 在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容，将程序补充完整。

Private Sub Command1_Click()

Open"c:est.dat"For Output As#1

Fori=1 to Len(Text1.Text)

(12)

Close# i

End Sub

正确答案：

Print#A,Mid(TextA.Text,i,A)

参考解析：

Print#语句的功能是，把数据写入文件中。其格式为：Print#文件号，[[Spc(n)|Tab(n)][表达式表][；|，]]。本题要将文本框中的内容一个字符一个字符地写入顺序文件，用Mid函数取字符，所以本题答案是Print#1，Mid(Text1.Text，i，1)。

请充值VIP继续使用（未注册用户支付后会自动注册登录）