Avaddon
Кстати, уже создал (еще до того как прочитал твой последний пост ).
Модуль есть.
Ввожу:
Private Sub Комманда1_Click()
Dim key As Longint
If RegOpenKey(HKEY_LOCAL_MACHINE, "\Software\ZZ", key) = 0 Then ' Твой код тут '
RegCloseKey(key);
Else
MsgBox "Ходи лесом, реестр запилили!"
End If
End Sub
Ошиба: key As Longint Определяемый пользователем тип не определен.

ANTIHacker
Да убери ты декларацию... Ну не помню я детали Барсика, не помню...

Avaddon

Последний вопрос, последний. Как ее убрать ?

ANTIHacker
Убери слова Dim key as Longint

Avaddon
Да, ошибка перестала выскакивать. Вопрос : как указать, что ключ 1 именно DWORD, строковой параметр и т.п.?

Неужели никто не знает ?

ANTIHacker
Знают. Просто народу лень сюда учебник по барсику постить.
Почитай описание синтаксиса языка - сам поймешь.