Resumen Imprimir códigos de barras (Mabry)

Yo hago lo siguiente:

  With Barcod1
    .PrinterScaleMode = Printer.ScaleMode
    .PrinterLeft = iPosicionX
    .PrinterTop = iPosicionY
    .PrinterWidth = iAnchoMaximo
    .PrinterHeight = iAltura
    .Alignment = bcALeft
    .Style = msSANSI3of9
    .BarWidth = iAnchoBarras
    .Caption = sCodigoArticulo
    .PrinterHDC = Printer.hDC
  End With

    Printer.ScaleMode lo selecciono a vbPixels, y en iAnchoMaximo lo que
guardo es el ancho maximo que he reservado en la etiqueta para poner el
código de barras. Si el código termina antes, al imprimirlo me limpia el
espacio que sobre, si no llega el espacio, visualiza todo el campo de
color negro. La línea más estrecha del código me las hace con el número
de pixels que indiqué en Barcode1.BarWidth.


Saludos.............. GLL

Origin: PGP Disponible. InterNet (llander@pobox.com)_FidoNet_(2:348/613.26)



Resumen Resumen

Visual Basic Página de Visual Basic

Página principal Página principal

www.jrubi.com