注册表问题,高人帮忙写个例子
例：HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\word1
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\word2
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\word3
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\word4
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\word5
............
这个位置下分别假定分别有 word1， word2， word3，等若干项
程序启动检测HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer下是否只有word1如果只有word1不做操作，如果还有其他的word2,word3等，就只保留word1，其他的全删，帮忙写个小例子啊
[解决办法]
While RegEnumKey(hKey, i, astr, 256) = ERROR_SUCCESS
ListView1.ListItems.Add 1, , astr
i = i + 1
Wend
这里改成
While RegEnumKey(hKey, i, astr, 256) = ERROR_SUCCESS
If InStr(astr, "word1") = 0 Then
'这里写删除项的代码
End If
i = i + 1
Wend
