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