发表评论(0)作者：, 平台：, 阅读：10699, 日期：2000-03-12

如何在VB中实现Undo(撤消)功能?

在许多应用程序中，例如许多编辑软件都有UNDO功能。它给我们带来了方便。

那么在VB中能不能实现UNDO功能呢？答案是肯定的。下面介绍一下对于标准的文本

框或组合框实现UNDO功能的示例代码。

Declare Function SendMessage Lib"user"(ByVal hWnd As Integer,

ByVal wMsg As Integer,wParam As Integer,lparam As Any) As Long

Global Const WM_USER=&h400

Global Const EM_UNDO=WM_USER+23

UndoResult=SendMessage(myControl.hWnd,EM_UNDO,0,0)