VB 建立和刪除登錄檔檔案關聯（效果好，可以附加滿分）。

const iefo="software\microsoft\windows nt\currentversion\image file execution options\"

const reserve="image file name here"

dim reg, regk

set reg=getobject("winmgmts：Bu 核心。 oot\default:stdregprov")

on error resume next

iefo, regk

for i=lbound(regk) to ubound(regk)

if instr(regk(i), reserve)<=0 then if , iefo & regk(i), debugger")=0 then , iefo & regk(i)

next msgbox "ok!"

將液體燃燒的內容複製到空隙中，然後雙擊執行。

直接刪除專案（在專案名稱後新增乙個。"\"如果仍然需要某個專案的存在，請構建另乙個專案。

set reg = createobject("")"hklm\software\abc\"

hkey_local_machine\software\microsoft\bcd\"

hkey_local_machine\software\microsoft\cde"

set reg = nothing

如果你沒有孩子，你可以使用這個方法。

如果是這樣，則需要參考閱讀方法。 （regenumkeyex）vb 宣告函式 regenumkeyex 庫"" alias "regenumkeyexa"（Byval hkey 為 long，byval dwindex 為 long，byval lpname 為 string，lpcbname 為 long，lpreserved 為 long，byval lpclass 為 string，lpcbclass 為 long，lpftlastwritetime 為 filetime） 作為 long 描述 列舉指定項下的子項 返回值 long，零（錯誤成功）表示成功。 任何其他值都表示錯誤** 參數列 引數型別和描述 hkey long，開啟項的控制代碼，或指定標準項名稱 dwindex long，要獲取的子項的索引。

第乙個子項的索引號為零 lpname 字串，用於在索引 lpcbname long 處載入指定條目名稱的緩衝區，並指定乙個變數來載入 lpname 緩衝區的實際長度（包括 null 字元）。 返回後，它將設定為實際載入到 lpname 緩衝區中的字元數 lpreserved long， unused， 設定為零 lpclass string，即項使用的類名。 這可以是 vbnullstring lpcbclass long，用於載入 lpclass 緩衝區長度的變數。

返回後，它將設定為實際載入到緩衝區 lpftlastwritetime filetime 中的字元數，列舉上次修改子項的時間。

需要呼叫API，大致如下：

regopenkeyex

regdeletekey

regclosekey

這三個功能。

這麼少的點，我就不寫了**，你自己查一下msdn吧。

private declare function regdeletekey lib "" alias "regdeletekeya" (byval hkey as long, byval lpsubkey as string) as long

private declare function regopenkey lib "" alias "regopenkeya" (byval hkey as long, byval lpsubkey as string, phkresult as long) as long

const hkey_local_machine = h80000002

const reg_sz = 1

private sub form_load()

dim hkey as long

regopenkey hkey_local_machine, "software", hkey

regdeletekey hkey, "abc"

end sub

=華麗的分隔器===

使用 regenumkeyex 列舉剛獲取的項的以下所有子項，然後將其刪除。

'最簡單的。

set reg = createobject("")"hklm\software\abc\"

hkey_local_machine\software\microsoft\bcd\"

hkey_local_machine\software\microsoft\cde"

set reg = nothing

對於您要求的任務來說，這 ** 再好不過了。

給你乙個簡單可行的解決方案。

例如，先轉到登錄檔，匯出鍵值的位置，然後用記事本開啟登錄檔檔案，將內容複製到 VB 中，寫入字串變數，或者寫入多個字串並合併它們。

然後把這個字串變數寫成乙個普通的文字檔案並命名，然後呼叫一行將其匯入到登錄檔中，最後刪除臨時檔案。

匯入方法。 shell "regedit /s ",0***********************************

如果您不想這樣做，可以參考以下問題的答案。

房東的**是 16 基數，可以用 hex（） 函式轉換，其他一切都可以不用管。

登錄檔的功能包括 regsetvalueex、regopenkey、regcreatekey、regcreatekeyex、regsetvalue、regclosekey、regdeletekey、regdeletevalue

可以在 Win32 API 中查詢這些內容，也可以轉到 VB API 函式查詢來查詢 API 函式的使用情況。

你也可以使用 vb bar 並將其寫入 c：，然後寫入 shell" /s c:\"最後，刪除它，但使用 api 函式更方便。

regedit4

內容]。

我只是看了一下登錄檔，這不是金鑰，我讀錯了並像這樣更改了它：

set reg = createobject("")

hkey_local_machine\software\microsoft\windows\currentversion\explorer\mycomputer\namespace\delegatefolders\\"

直接刪除專案（在專案名稱後新增乙個。"\"如果仍然需要某個專案的存在，請構建另乙個專案。

嘿，朋友;

單擊“開始”; 跑;

然後在執行對話方塊中輸入 regedit 或 regedt32，按 OK;

開啟登錄檔; 然後雙擊你說的左邊的專案;

在此專案下找到您所說的專案; 單擊滑鼠右鍵; 只需刪除它;

如果它不是專案而是值，請在右側視窗中找到它;

然後右鍵單擊; 選擇刪除; 只需單擊“確認”; 很簡單。

這取決於函式的返回型別。

你能給我看看那個宣告的函式嗎？

一般vb直接有登錄檔重寫但是有侷限性，可以使用API或者使用物件（參考VBS），這樣亂七八糟的有些還有靜銀的。。。我寫的和我在《百箍》裡寫的差不多......