[填空题] 在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Command1。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test .dat中。请
24 查阅
[填空题] 在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Command1。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test .dat中。请在空格处填上适当的内容,将程序补充完整。
Private Sub Command1_Click()
Open "c:est.dat"For 【14】 As #1
For i=1 to Len(Text1.text)
print#1,mid(Text1.Text,i,1)
Next
Close #i
End Sub
参考答案: