Crystal Report - crystal e impresora de etiquetas zebra

Hola, necesito ayuda urgente... estoy imprimiendo en la impresora zebra tlp 2844 etiquetas. Uso crystal report y VB 6; bueno, pues si mando la etiqueta desde el diseño de crystal funciona bien (aunque tarda y no tiene muy buena calidad) pero si lo hago desde Vb (igual que hago con una impresora normal o incluso con una de Tickets) no funciona, no aparece error ni nada de nada...

A la instalación de la zebra la llamo Etiqueta.

este es el código:
'cargo la impresora de etiquetas (la buscamos porque no es la predeterminada)
For Each prnprinter In Printers
If InStr(1, UCase(prnprinter.DeviceName), "ETIQUETA") > 0 Then
Set Printer = prnprinter

strDeviceName = prnprinter.DeviceName
strDriver = prnprinter.DriverName
strpuerto = prnprinter.Port
Exit For
End If
Next

Public crReport As New CRAXDRT.Report
Public crProperties As CRAXDRT.ConnectionProperties

Set crReport = crApp.OpenReport(INFORME, 1)
Set crProperties = crReport.Database.Tables(1).ConnectionProperties

crReport.SelectPrinter strDriver, strDeviceName, strpuerto
crReport.PrintOut False


Espero alguien me pueda ayudar, porque en el servicio técnico de Zebra dicen que no es tema suyo, que fallará VB o Crystal y eso me parece raro, raro...
Gracias de antemano