Ver Mensaje Individual
  #2 (permalink)  
Antiguo 17/02/2006, 02:56
LeandroA
 
Fecha de Ingreso: abril-2005
Mensajes: 351
Antigüedad: 19 años, 1 mes
Puntos: 3
Private Sub Command1_Click()
Dim i As Integer
For i = 1 To Len(Text1)
MsgBox Mid(Text1, i, 1)
Next
End Sub