填空题

在窗体上画一个文本框，名称为Text1，画一个命令按钮，名称为Command1。程序运行时，单击命令按钮，能将事先输入文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空格处填上适当的内容，将程序补充完整。
Private Sub Command1_Click()
Open"c:\test.dat"For Output As#1
Fori=1 to Len(Text1.Text)
(12)
Next
Close# i
End Sub