Ver Mensaje Individual
  #2 (permalink)  
Antiguo 01/12/2006, 17:09
LeandroA
 
Fecha de Ingreso: abril-2005
Mensajes: 351
Antigüedad: 20 años
Puntos: 3
hola desde visual lo podes hacer

Cita:
Private Sub Command1_Click()
Text1.SelStart = Len(Text1)
End Sub

y con las apis

Cita:
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
(ByVal hWnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, lParam As Any) As Long
Private Sub Command2_Click()
SendMessage Text1.hWnd, &H115, 7, 0
End Sub
Saludos
__________________
www.leandroascierto.com