AYUDA CENTRAR UN TEXTO

ADRIAN
04 de Noviembre del 2005
Gracias por leer este mensaje, mi duda es de cómo imprimir un texto centrado, es para unas etiquetas que mi jefe me ha solicitado...
Cómo puedo mandar a imprimir un texto justificado????

mvallejos
04 de Noviembre del 2005
Con las porpiedades del printer

CurrentX, CurrentY, Width, Height, TextWidth y TextHeight
Por ejemplo, si quisiéramos centrar un texto

Dim Texto as String

Texto = "TITULO DE EJEMPLO"

' 3 Cm de margen superior
Printer.CurrentY = 57 * 30
Printer.CurrentY = (Printer.Width - Printer.TextWidth(texto)) /2
Printer.Print Texto
Printer.EndDoc

Si necesitaras ubicar texto libremente, recuerda que en impresora, 57 twips equivale a 1 mm

Saludos