调用api函数出错

[softzhou]

我调用api 函数RegOpenKey,在声明处:
Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal phkResult As Long) As Long
定义'HKEY_LOCAL_MACHINE = &H80000002'
调用 RegOpenKey (HKEY_LOCAL_MACHINE,...,...)
出错

[saucer]

what error did you get?

it is easier to use Microsoft.Win32.Registry class, but you insist, see

http://www.allapi.net/apilist/RegOpenKey.shtml

see the example part

[Montaque]

Private Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, ByVal phkResult As Long) As Long
把所有long类型改为integer
载vb.net中,Integer是32位的，相当于原来的long