怎样编写VB中的语言使生成可执行程序能修改自身数据并保存

来源：百度知道 编辑：UC知道 时间：2024/06/23 12:22:13
我想用VB编一个程序，这个程序在执行时可以变更原始数据，但关闭以后再次执行该程序时，其中的数据是变更后的数据。请问，我该怎样编写该程序？最好弄个例子（代码），谢谢了！

如果数据少，且是字符<255那么可以用
RegSetValueEx(keyhand, strValue, 0, REG_SZ, ByVal strdata, Len(strdata))

Dim lBufferSize As Long
’新建主键的过程
Public Sub savekey(hKey As Long, strPath As String)
On Error GoTo ERR_savekey
Dim keyhand&
r = RegCreateKey(hKey, strPath, keyhand&)
r = RegCloseKey(keyhand&)
Exit Sub
ERR_savekey:
MsgBox Err.Number & "- " & Err.Description
Resume Next
End Sub
’保存字符型键值
Public Sub savestring(hKey As Long, strPath As String, strValue
As String, strdata As String)
On Error GoTo ERR_savestring
Dim keyhand As Long
Dim r As Long
r = RegCreateKey(hKey, strPath, keyhand)
r = RegSetValueEx(keyhand, strValue, 0, REG_SZ, ByVal strdata, Len(strdata))
r = RegCloseKey(keyhand)
Exit Sub
ERR_savestring:
MsgBox Err.Number & "- " & Err.Description