• Jueves 2 de Mayo de 2024, 23:45
« anterior próximo »
Páginas: [1]

Autor Tema:  Imprimir Verticalmente  (Leído 1221 veces)

FABIANGARCIA

  • Miembro activo
  • **
  • Mensajes: 38
    • Ver Perfil
Imprimir Verticalmente
« en: Sábado 9 de Octubre de 2004, 15:45 »
0
: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

FABIANGARCIA

  • Miembro activo
  • **
  • Mensajes: 38
    • Ver Perfil
Re: Imprimir Verticalmente
« Respuesta #1 en: Sábado 9 de Octubre de 2004, 16:21 »
0
:kicking:  :kicking:  :kicking:

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

SUERTE
El mensaje contiene 1 archivo adjunto. Debes ingresar o registrarte para poder verlo y descargarlo.

RadicalEd

  • Moderador
  • ******
  • Mensajes: 2430
  • Nacionalidad: co
    • Ver Perfil
Re: Imprimir Verticalmente
« Respuesta #2 en: Sábado 9 de Octubre de 2004, 19:58 »
0
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.  
El pasado son solo recuerdos, el futuro son solo sueños
Páginas: [1]
« anterior próximo »