Tengo esto:
Código
Entonces se supone que cada 1500 ms la posicion del texto deberia moverse un sitio a la izquierda, ¿no? Pero en el text box me va añadiendo el caracter %...
Option Explicit Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Any, ByVal lParam As Long) As Long Private Sub Form_Load() Timer1.Interval = 1500: Text1 = "HOla amigosssss" End Sub Private Sub Timer1_Timer() Call SendMessage(Text1.hwnd, &H102, vbKeyLeft, 0&) End Sub
Y si pongo vbKeySpace funciona bien, me va añadiendo espacios, pero porque falla con vbKeyLeft???
Gracias!