Question

VB如何保存最后一次输入的数据？一个VB程序，需要输入一些数据，关闭程序再打开后想还是保存上次的输入！

Answer 1

放入文件中，其他地方不能保存

Answer 2

存放到注册表中

追问

具体说来怎么搞？？？？

追答

创建或保存应用程序设置值

可以使用 SaveSetting 语句将一个新值保存至存储于应用程序注册位置中的注册表项中。例如，可以向应用程序的主窗体中的 Form_Unload 事件添加代码以便在停机时保存设置值，或者向“选项”对话框的 Form_Unload 事件添加代码以便更新的首选项。按以下语法使用 SaveSetting 语句：SaveSetting appname, section, key, value下列代码保存 Backup 和 LastEntry 表项的新值，这些表项包含在名为“RegCust”的应用程序的注册位置的启动部分。该代码假设变量 strDate 和intLastEntry 包含有新的值。
Private Sub Form_Unload(Cancel As Integer)
SaveSetting "RegCust", "Startup", "Backup", strDate
SaveSetting "RegCust", "Startup", "LastEntry", intLastEntry
End Sub
如果在注册位置的 Software/Microsoft 部分没有应用程序“RegCust”的注册项、或者没有这些指定的部分或注册表项，该代码将创建它。

检索应用程序设置值（程序启动时读取数据到应用程序中）

可以使用 GetSetting 和 GetAllSettings 函数检索存储在应用程序注册位置的注册值。例如，应用程序能够检索注册表设置值以便在它被关闭时重新建立其条件。一次检索一项设置值如果仅检索一项注册表设置值，通过以下的语法使用 GetSetting 函数：GetSetting(appname, section, key[, default])下列代码检索“RegCust”应用程序启动部分的 LastEntry 表项的值，并将该值显示在立即窗口中。
Private Sub Form_Load()
Dim intLastEntry As Integer
intLastEntry = GetSetting("RegCust", "Startup", "LastEntry", "0")
Debug.Print intLastEntry
End Sub
应注意，可以使用可选的参数 default 设置，当注册位置中指定的表项没有值时由 Visual Basic 返回的值。