实用的TextBox控件的Undo属性

原创 2004年07月10日 10:34:00

    很少有VB开发人员注意到文本框(TextBox)控件具有Undo属性,但这一属性却给程序员带来方便。这是一个相当出色的特性,在很多需要编辑文本或者图形的商业软件的开发中都使用到。许多程序都需要多级别的撤消,或者有些程序需要“重新操作”而取消最后一步的操作,这些繁琐的要求都需要复杂的编程设计,但TextBox控件的一个简单的Undo属性就可以很容易地实现这些过程。

motion_336.gifmotion_336.gif code;sz=1x1;ord=197733977?

由于Undo功能是属于文本框控件,你所需要的是向控件发送一个“undo youself”的消息。这一过程可以使用API函数SendMessage来实现。这一函数的声明为:

Declare Function SendMessage Lib "user32" Alias _
  "SendMessageA" (ByValhWnd As Long, _
  ByValwMsg As Long, ByValwParam As Long, _
  lParam As Any) As Long

第一个参数是接受消息的句柄,在本例中为TextBox控件的hWnd属性。

第二个参数是识别消息的数字。为了能够撤消某一操作,通常传递&HC7值,这也是代表着EM_UNDO常量。

第三个和第四个参数可用于某些消息,但在本例中它没有被使用,你可以将它们置为0。

函数返回的值取决于发送的消息。在本例中可以被省略。

 

为了能真正使用这一技巧,建立一个带有一个窗体的工程,窗体中包含一个TextBox控件和一个Command按钮控件。在Command按钮控件的点击事件程序中添加以下代码行:

SendMessage Text1.hWnd, EM_UNDO, 0&, 0&

在工程中添加一个模块并在模块中添加如下的代码:

Public Const EM_UNDO = &HC7
Public Declare Function SendMessage Lib "user32" _
  Alias "SendMessageA" (ByValhWnd As Long, _
  ByValwMsg As Long, ByValwParam As Long, _
  lParam As Any) As Long

当运行这一工程时,在TextBox控件中输入和编辑文本。可以看到,按钮撤消了最后一步的操作。如果没有什么东西可以撤消,消息就不会起作用。你可以将Undo属性作为一个菜单命令以影响文本框的激活,如下所示:

If TypeOfActiveControl Is TextBox Then
    SendMessageActiveControl.hWnd, EM_UNDO, 0&, 0&
End If

如果一个文本框没有被激活,按钮就不会执行任何操作。

TextBox控件的Undo属性是一个具有吸收力和友好的特性,并且使用起来非常的简单。

设置TextBox控件的TextMode属性

我想在程式代碼中將TextBox控件的TextMode属性设置為Password,寫成TextBox1.TextMode=MultiLine和TextBox1.TextMode="MultiLine"...
  • yangyongli814
  • yangyongli814
  • 2007年03月15日 17:49
  • 2933

textbox的属性设置

textbox的属性设置 1、textBox.text得到一个String类型的对象。 2、textBox.AppendText("XX")追加文本。 3、textBox.AcceptsReturn...
  • lovejesuslove
  • lovejesuslove
  • 2016年03月21日 10:49
  • 3042

TextBox的ReadOnly属性

如果TextBox服务器控件的ReadOnly属性设置为True,在服务器端将得不到TextBox服务器的值。这是为了安全性考虑,在服务器端不处理只读文本框。 @ Page Language="C#"...
  • summer_grass
  • summer_grass
  • 2008年05月29日 13:50
  • 1358

C#笔记(5)textbox的hint属性

新建类 public static class Win32Utility { [DllImport("user32.dll", CharSet = CharSet.Auto...
  • yangye608
  • yangye608
  • 2017年09月02日 20:27
  • 351

asp.net控件PlaceHolder简介

PlaceHolder控件是一种容器,用来存放控件。所以可以应用在页面动态添加控件。可以在使用中向PlaceHolder添加任何HTML控件,也可以添加js代码。满足了在特定位置动态添加移除控件的需求...
  • u011458469
  • u011458469
  • 2014年12月07日 21:37
  • 1499

WPF中控件绑定某类的成员变量

在代码中,设置:ClassA InstanceA; //InstanceA 为基类的一个成员变量; this.XXControl.DataContext = InstanceA; 该类的声明:...
  • songshu5555
  • songshu5555
  • 2016年03月09日 14:39
  • 2311

WPF之TextBox相关属性

VerticalScrollBarVisibility="Auto" TextWrapping="Wrap"
  • favajing123
  • favajing123
  • 2014年06月16日 17:50
  • 366

ASP.NET RegularExpressionValidator 控件

定义和用法 RegularExpressionValidator 控件用于验证输入值是否匹配正则表达式指定的模式。 注释:除非浏览器不支持客户端验证或 EnableClientScript...
  • pilot10
  • pilot10
  • 2015年10月10日 10:18
  • 405

C# .NET 遍历一个Web页面中所有的TextBox控件 并设置读写属性

在项目开发的实际应用中,有很多“找到一个容器内的XX控件,为他们设置相同的属性或者行为”,而这些XX控件可能位于这个容器的不同层次,即某个容器中可能还有容器,对于这种情况,这明显就是递归的用武之地嘛!...
  • yanbuodiao
  • yanbuodiao
  • 2011年09月26日 17:27
  • 5957

ASP.NET中TextBox控件设置TextMode…

在ASP.NET中,将TextBox控件的TextMode属性设置为MulitLine时,再设置MaxLenght="N"时将无法实现输入长度的限制,MaxLenght属性只对单行文本框有效。那么,想...
  • biaobiao1217
  • biaobiao1217
  • 2014年09月10日 15:22
  • 1045
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:实用的TextBox控件的Undo属性
举报原因:
原因补充:

(最多只允许输入30个字)