安卓安智:文件模式错误,怎么回事?

来源:百度文库 编辑:中科新闻网 时间:2024/05/04 19:14:36
我编了一个小程序,有一个文本框(TEXT值为空)和一个按钮(CAPTION值为“输出数据”)。我的目的是先在文本框输入数据,再按一下这个按钮,将文本框里的数据保存到指定的文本文件里(比如D:\a.txt),我的代码是:
Option Explicit
Dim x As String

Private Sub Command1_Click()
Open "d:\a.txt" For Input As #1
Write #1, x
Text1.Text = x
End Sub
但是运行后提示:文件模式错误,请问我的代码哪里有错,怎么改?

Open "d:\a.txt" For Output As #1
Write #1, Text1.Text