我按教材编写了读写注册表程序，总是程序崩溃。
我猜想可能如下一句有问题。
Const HKEY_LOCAL_MACHINE = &H80000002
那位高手给以个简单的读写注册表程序，万分感谢。

我也很想知道，请高手指点！

'Const HKEY_LOCAL_MACHINE = &H80000002 '这个没问题是定义主主键，修改注册表可以用VBS格式简单不用什么声明。 Private Sub Command1_Click() '这个按钮点下后，你的程序将设置成开机自动运行程序。 Dim WSH Set WSH = CreateObject("WScript.Shell") 'Dim Rpath As String'Rpath = "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName & ".exe" 'WSH.regWrite Rpath, App.Path & "\" & App.EXEName & ".exe", "REG_SZ" WSH.regWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\" & App.EXEName & ".exe", App.Path & "\" & App.EXEName & ".exe", "REG_SZ" End Sub

[此贴子已经被作者于2005-9-5 13:03:31编辑过]