Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Letra por letra

Estas en el tema de Letra por letra en el foro de Visual Basic clásico en Foros del Web. Hola!. que tal mis hermanos web, hoy hago una pregunta? Que codigo o que ejemplo? como se puede hacer que por ejemplo, un texto que ...
  #1 (permalink)  
Antiguo 28/05/2011, 13:34
Avatar de servantsoftware  
Fecha de Ingreso: abril-2011
Ubicación: 1 Pedro 4.11
Mensajes: 94
Antigüedad: 13 años
Puntos: 3
Pregunta Letra por letra

Hola!. que tal mis hermanos web, hoy hago una pregunta?

Que codigo o que ejemplo? como se puede hacer que por ejemplo, un texto que tenga en un textbox o en un archivo de texto haga el efecto de como si estubieran digitando las letras, como por ejemploque vayan saliendo letra por letra, ojala y me entiendan, Gracias.
  #2 (permalink)  
Antiguo 28/05/2011, 15:47
 
Fecha de Ingreso: octubre-2008
Mensajes: 188
Antigüedad: 15 años, 6 meses
Puntos: 3
Respuesta: Letra por letra

Supongo que se podrá mejorar. Espero que te sirva.

Option Explicit
Dim i As Integer
Dim matriz(20) As String

Private Sub Form_Load()
matriz(0) = "E"
matriz(1) = "s"
matriz(2) = "c"
matriz(3) = "r"
matriz(4) = "i"
matriz(5) = "b"
matriz(6) = "o"
matriz(7) = " "
matriz(8) = "l"
matriz(9) = "e"
matriz(10) = "t"
matriz(11) = "r"
matriz(12) = "a"
matriz(13) = " "
matriz(14) = "a"
matriz(15) = " "
matriz(16) = "l"
matriz(17) = "e"
matriz(18) = "t"
matriz(19) = "r"
matriz(20) = "a"
i = 0
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Label1.Caption = Label1.Caption & matriz(i)
i = i + 1
If i = 21 Then
Timer1.Enabled = False
End If
End Sub
  #3 (permalink)  
Antiguo 28/05/2011, 21:39
Avatar de servantsoftware  
Fecha de Ingreso: abril-2011
Ubicación: 1 Pedro 4.11
Mensajes: 94
Antigüedad: 13 años
Puntos: 3
Respuesta: Letra por letra

Perfecto amigo, muchísimas Gracias!!

Etiquetas: letrapoletra
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 10:49.