RegNotifyChangeKeyValue的问题

[limengchen]

用RegNotifyChangeKeyValue(lpKey, True, REG_NOTIFY_ALL, AddressOf RegistryChanged, 1)监视注册表，在任务列表窗口中出现“Integer”不是委托类型，因此“AddressOf”表达式不能转换为“Integer”的错误。

RegNotifyChangeKeyValue的声明如下：
Private Declare Function RegNotifyChangeKeyValue Lib "advapi32.dll" Alias "RegNotifyChangeKeyValue" (ByVal hKey As Integer, ByVal bWatchSubtree As Integer, ByVal dwNotifyFilter As Integer, ByVal hEvent As Integer, ByVal fAsynchronus As Integer) As Integer

哪里错了？

[Montaque]

用intptr试一下！