SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: FABIANGARCIA en Sábado 9 de Octubre de 2004, 15:45

Título: Imprimir Verticalmente
Publicado por: FABIANGARCIA en Sábado 9 de Octubre de 2004, 15:45
:comp:  :comp:

HOLA DE NUEVO YO

UNA PREGUNTA

SE PUEDE IMPRIMIR UN TEXTO QUE ESTA HORIZONTAL EN FORMA VERTICAL
EJEMPLO:

HOLA IMPRIMIRLO ASI

            H
            O
            L
            A

GRACIAS
 
SUERTE A TODOS
Título: Re: Imprimir Verticalmente
Publicado por: FABIANGARCIA en Sábado 9 de Octubre de 2004, 16:21
:kicking:  :kicking:  :kicking:

HOLA DE NUEVO YA ENCONTRE UN EJEMPLO ES EXCELENTE SE LOS DEJO PARA EL QUE LO NECESITE

SUERTE
Título: Re: Imprimir Verticalmente
Publicado por: RadicalEd en Sábado 9 de Octubre de 2004, 19:58
MUY VAKNO DA LA SENSACION DEL INICIO DEL WINDOZE GRACIAS AUNQUE TODAVIA NO LO PONES DE LA FORMA QUE QUIERES
MIRA SI TE SIRVE ASI
Código: Text
  1.  
  2. '1 TextBox + 1 Command + 1 Label
  3. Private Sub CmdAce_Click()
  4. x = Len(Text1.Text)
  5. For a = 1 To x
  6.     Lbl.Caption = Lbl.Caption & vbCrLf & Mid(Text1.Text, a, 1) ' & vbCrLf
  7. Next a
  8. End Sub
  9.  
  10.