Нужно отловить открытые дочерние окна - VB

Формулировка задачи:

Задача: Нужно отловить открытые дочерние окна (т.е. есть открытое 1С:Предприятие, а в нем ещё несколько окон). Что не получаеться: VB выдаёт ошибку на строке 'GetWindowText HWnd, sSave, retval + 1'. Вот ошибка - 'Невозможно найти допуск в DLL GetWindowText in user32'. Выше в модуле эта функция описана: 'Declare Function GetWindowText Lib 'user32' (HWnd, PChar, MaxCount) As Integer '. Вопрос: Как можно избавиться от этой ошибки? И вообще не понятно, чего отказано в допуске. Система: Вын 98. VB6,5; 1 пользователь - админ!!! Заранее благодарен!!!

Решение задачи: «Нужно отловить открытые дочерние окна»

textual
                            Листинг программы 
                        
                            Declare Function GetWindowText Lib 'user32' Alias 'GetWindowTextA'
    (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long