Народ, помогите. Не работает функция GetModuleHandle. Не могу получить hInstanse: Private Declare Function GetModuleHandle Lib "kernel32" Alias "GetModuleHandleA" (ByVal lpModuleName As String) As Long Priate Sub Form_load() Dim IDLib As Long ' Указатель на библиотеку IDLib = GetModuleHandle("explorer") Все время возвращает ноль. Вместо explorer пробовал и explorer.e xe, и какие еще комбинации не пробовал. Передавал не только имена exe-модулей, но и dll. Все время одно и то же -возвращает ноль, a GetLastError =126
Ответить
|