VB6中TEXT1TEXT文本框中输入的数据如何保存

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