imprimir imagen con MSComm

[pablinweb]

Hola foreros, saben que utilizo hace tiempo una función para imprimir texto en una impresora que esté conectada al puerto com con MSComm, les copio aquí la función que utilizo

Código:

Public Function ImprimeCom(paramBuffer as string) As Integer

Dim n As Integer
Dim resp As Integer

On Error GoTo errImprimeCom

ImprimeCom = cERR_NODEF

mCancelar = False
mReintentar = False

Do
    mReintentar = False
    comOut.PortOpen = True
    If mCancelar Then
        Exit Function
    End If
Loop While mReintentar

For n = 1 To Len(paramBuffer) Step 512
    Do
        mReintentar = False
        comOut.Output = Mid(paramBuffer, n, 512)

        Retardo
        If mCancelar Then
            comOut.PortOpen = False
            Exit Function
        End If
    Loop While mReintentar
Next n

comOut.PortOpen = False

ImprimeCom = cERR_OK

Exit Function

y me funciona muy bien, el tema es que tengo que imprimir una imagen! a alguien se le ocurre como agregar una imagen a esta rutina?

desde ya muchas gracias