Declare Function CreateCompatibleDC Lib "gdi32" ( _
ByVal hdc As Long) As Long
CreateCompatibleDC создает виртуальный контекст устройства, совместимый с заданным контекстом. Созданный контекст существует только в памяти. Не забывайте уничтожать созданный контекст функцией DeleteDC, если вы в нем больше не нуждаетесь.
В успешном случае возвращается описатель контекста устройства. В случае ошибки возвращается 0 (используйте GetLastError для получения кода ошибки).
Смотри пример icon.zip