ong, ByVal n1 As Long, ByVal n2
 As Long, ByVal un2 As Long) As Long
Private Declare Function LoadImageLong Lib "USER32" Alias "LoadImageA" (ByVal
 hInst As Long, ByVal lpsz As Long, ByVal un1 As Long, ByVal n1 As Long, ByVal
 n2 As Long, ByVal un2 As Long) As Long
    Private Const LR_LOADMAP3DCOLORS = &amp;H1000
    Private Const LR_LOADFROMFILE = &amp;H10
    Private Const LR_LOADTRANSPARENT = &amp;H20
    Private Const LR_COPYRETURNORG = &amp;H4

' Blitting functions
Private Declare Function BitBlt Lib 