Question

vb中的窗体卸载后的变量保存问题

在vb的一个程序中，只有一个窗体，窗体中，有一个label1,一个text1,一个command1。
label1初始caption值为空。

如果想在text1里面输入一个字符串，比如说“密码”，然后点击command1后label1.caption=“密码”，当关闭这个窗体，要求下次运行时label1的caption值依然是“密码”，而不会重新变成空值，有什么办法没？

我的意思是难道一定要把text1的值保存到文件里，然后在执行的时候用form的load事件导入吗？有没有其他简单点的方法保存这个变量？

困扰已久，十分感激！

Answer 1

可以写入环境变量，也可以写入注册表。
以写入环境变量举例：
Dim x As Object

Private Sub Command1_Click()
x("abc") = Text1.Text

End Sub

Private Sub Form_Load()
Set x = CreateObject("WScript.Shell").Environment("system")
Label1.Caption = x("abc")
End Sub

Answer 2

有 最简单的语句，保存在注册表里
Private Sub Command1_Click()
SaveSetting "MyApp", "Startup", "mima", Text1
label1.Caption = Text1
End Sub

Private Sub Form_Load()
a = GetSetting("MyApp", "Startup", "mima")
label1.Caption = a
End Sub

Answer 3

只能保存到文件里，文本文件、配置文件、或者注册表里。
下次开启程序时读进来再显示。
没有什么简单的。内存没有长期存储功能。

Answer 4

如果程序没有完全退出的话，还可以用一个全局变量来存放，但程序完全退出了的话，我除了用文件来放，没有其它的方法，等待其他高手，学习中。。。。。。