关于TEXT控件里的值如何保存？？？？

Question

请教问题，我在一个TEXT文本框里写了个数字然后关上程序，下次打开后我仍然能看见文本框里上次写的数字，怎么做啊？谢谢大家。

Answer 1

文本较少的话利用注册表或INI文件保存，如果较多的话在form_UNload事件中保存到文本文件。

Answer 2

利用注册表的最简单的例子：Const k1 = "MM_PLAYER"
Const k2 = "CONFIG"
Private Sub Form_Load()
Text1.Text = GetSetting(k1, k2, "1")
End SubPrivate Sub Form_Unload(Cancel As Integer)
SaveSetting k1, k2, "1", Text1.Text
End Sub

Answer 3

ikey(逃兵) 你说的在注册表里什么意思啊？我的只是要保存个数字，不多比如1000或者是2000等，就是个数字，怎么和注册表联系上了呢？

Answer 4

Private Sub Form_Load()
Dim MyChar As String
Open "c:\test.txt" For Input As #1
Do While Not EOF(1)
    Input #1, MyChar
Loop
Close #1
Text1.Text = MyChar
End SubPrivate Sub Form_Unload(Cancel As Integer)
Open "c:\test.txt" For Output As #1
Print #1, Text1.Text
Close #1
End Sub