vb中写入和读出内容

来源：百度知道 编辑：UC知道 时间：2024/06/17 08:34:49
三个文本框，第一个框输入路径形成文件，第二个框是我要向文件中写入的内容，第三个框是把文件中的内容读出来，前两步我会了
Open Text1.Text For Output As #1
Print #1, Text2.Text
Close #1
第三步怎么做?不要告诉我text3.text=text2.text，要三个步骤只用一个按钮！

您必须先在某个过程中完成对文件的写入，然后执行以按钮的单击事件完成读出内容到文本框三中。
Private Sub Command1_Click()
Dim wen1$, wen2$
Open Text1.Text For Input As #2
Do Until EOF(2)
Input #2, wen1
wen2 = wen2 & wen1
Loop
Close #2
Text3.Text = wen2
End Sub

Open Text1.Text For intput As #1
line #1, Text3.Text
Close #1
大概是这样