发信人: yingzi007()
整理人: cobe(2000-05-12 12:26:20), 站内信件
|
【 在 bkm02 () 的大作中提到: 】
如有空请到VB爱好者乐园看看。
http://yingzi007.126.com
如何在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)
--
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.103.30.123]
|
|