AYUDA CENTRAR UN TEXTO
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????
C贸mo puedo mandar a imprimir un texto justificado????
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
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
