Foro de elhacker.net

buenas a todos, soy nuevo en esto de programacion y bueno. estoy tratando de realizar un pequeño programa en el cual cuando escriba algo en un textbox puede deshacer cada cosa q haga. e estado averiguando y encontre el UNDO, pero eso me deshace todo y lo que yo deseo es DESHACER lo ultimo q se hizo o como se podria decir el CTRL Z q normalmente conocemos, pero solo faltaria el codigo, haber si alguien podria ayduarme en esto muchas gracias

http://www.elguille.info/Net/vb6anet/textbox01.htm#Deshacerlaultimamodificacion

Salu2!

esto se puede aplicar a los commando button u option button?. copio el cogido pero no lo rehace, en que estoy fallando
salu2

Supongo que has declarado la API antes:

Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" _
    (ByVal hWnd As Long, ByVal wMsg As Long, _
     ByVal wParam As Long, ByVal lParam As Long) As Long
 
Private Sub deshacerCmd_Click()
    Const EM_CANUNDO As Long = &HC6
    Const EM_UNDO As Long = &HC7
    '
    ' se comprueba si se puede deshacer
    If SendMessage(Text1.hWnd, EM_CANUNDO, 0&, 0&) Then
        ' si es así, se deshace
        SendMessage Text1.hWnd, EM_UNDO, 0&, 0&
    End If
End Sub

Fuente: http://www.elguille.info/Net/vb6anet/textbox01.htm#Deshacerlaultimamodificacion
Espero que al boton le hallas llamado igual... :-\

Salu2! ;)