请问在TextBox控键中 撤销的 的函数是什么?(菜鸟请教)

哪位好心人帮帮我啊!撤销的函数.

解决方案 »

  1.   

    Public Const EM_CANUNDO = &HC6
    Public Const EM_UNDO = &HC7
      

  2.   

    Private Sub Command1_Click()
        Text1.SetFocus
        SendKeys "^Z"        '发送ctrl+Z撤消
    End Sub
      

  3.   

    SendKeys "^Z"        '发送ctrl+Z撤消
      

  4.   

    Const EM_UNDO = 199
    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
        SendMessage Text1.hwnd, EM_UNDO, 0, 0
      

  5.   

    ： Yanjzh() 我们的代码都是vb6的，你可以试一下
      

  6.   

    谢谢各位,你们说的这些方法我之前都用过了.不过老是出错.(出错提示:文件找不到user).不知道是不是我的系统有问题.
      

  7.   

    原来又专门的undo啊？
    小弟不才，以前都是做2个textbox,一个作另一个的备份，undo的时候就倒回去