GetClassInfo

Declare Function Api_GetClassInfo& Lib "user32" Alias "GetClassInfoA" (ByVal hInstance&, ByVal lpClassName$, lpWndClass As WNDCLASS)

Declare Function GetClassInfo Lib "user32" Alias "GetClassInfoA" (ByVal hInstance As Long, ByVal lpClassName As String, lpWndClass As WNDCLASS) As Long

GetClassInfoEx を推奨