VB如何记忆文本框中的内容，下次运行时可以自动显示

VB如何记忆文本框中的内容，下次运行时可以自动显示

假设你1~4个TEXT是要保存数据的TEXT
Option Explicit

Private Sub Form_Load()
Text1.Text = GetSetting(App.Title, "Text1", "Text", "")
Text2.Text = GetSetting(App.Title, "Text2", "Text", "")
Text3.Text = GetSetting(App.Title, "Text3", "Text", "")
Text4.Text = GetSetting(App.Title, "Text4", "Text", "")
End Sub

Private Sub Form_Unload(Cancel As Integer)
SaveSetting App.Title, "Text1", "Text", Text1.Text
SaveSetting App.Title, "Text2", "Text", Text2.Text
SaveSetting App.Title, "Text3", "Text", Text3.Text
SaveSetting App.Title, "Text4", "Text", Text4.Text
End Sub
这样就行了程序关闭后自动在注册表HKEY_CURRENT_USER\Software\VB and VBA Program Settings\工程名字\下面存放！加载时自动加载的呵呵

在form_load事件加入
text1.text=...
...
就可以了。

应该要用到数据库

每次运行都要同样的数据，那要文本框有啥意义？还是你没说清楚？直接静态吧text属性设置了不就成了？还是要自动保存上次的？如果自动保存上次的，sunshinebean的就行，操作了注册表。

将数据保存到注册表或者文件中

unload里面存文件
load里面读文件