如何创建一个具有撤消上次操作按钮？

Question

在VB中，我想要创建一个按钮，使其有类似于WORD中撤消按钮的功能！该如何做？

Answer 1

用sendmessage给文本框发送EM_UNDO 消息：
Option Explicit
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 Const EM_UNDO = &HC7Private Sub Command1_Click()
    SendMessage Text1.hwnd, EM_UNDO, 0&, 0&
End Sub

Answer 2

用sendmessage的API，查查API浏览器就知道了

Answer 3

回：3661512(.Net)，   你说的方法只能实现一步撤消，例如：
我有一个text1框，我在框里输入123；然后进行撤消，第一次执行，框里内容为：12；
再撤消一次，框里内容又变为：123；并没有变成1；
即跟WORD中的多步撤消功能还是不一样。最好能在DataGrid控件中执行这种撤消功能！