VB6中TEXT1TEXT文本框中输入的数据如何保存，下次
打开窗体时，文本框的数据为上次的。
我用以下代码不行
Private Sub Command1_Click()
Open As c:\program files(x86)\microsoft visual studio\VB98 For Output As #shuju
Write #shuju, Text1.Text
Write #shuju, Text2.Text
Close #shuju

End Sub

Private Sub Command2_Click()
Open "c:\program files(x86)\microsoft visual studio\VB98" For Input As #shuju
Dim t1 As Integer, t2 As Integer
Input #shuju, t1
Input #shuju, t2
Text1.Text = t1
Text2.Text = t2
Close #shuju

End Sub

1、假设保存内容文件为config.ini，内容如下
   用户名
   密码
2、程序开始Call read_config，读取内容
   If Dir(App.Path & "\config.ini") <> "" Then
    Open App.Path & "\config.ini" For Binary As #1
    by = Space(LOF(1))
    Get #1, , by
    temp = Split(by, vbCrLf)
    Text(1).Text = temp(0)
    Text(2).Text = temp(1)
    close#1
   endif
3、 在text1和text2变化后，通过按键或者某个触发write_config，保存内容给你到config.ini