请教怎么为小弟我的程序中所有的textbox添加鼠标中键点击清空文本功能

2012-12-16

请问如何为我的程序中所有的textbox添加鼠标中键点击清空文本功能?假设我的程序有几十个窗口每个窗口上都

请问如何为我的程序中所有的textbox添加鼠标中键点击清空文本功能?
假设我的程序有几十个窗口每个窗口上都有textbox控件,并且在程序制作的过程中还会不停的删除添加,如何一劳永逸的为所有textbox控件都添加一个用鼠标中键点击时清空文本的功能?
[最优解释]



    public class TestTextBox : TextBox
    {
        protected override void OnClick(EventArgs e)
        {
            base.OnClick(e);
            this.Text = "";
        }
    }

[其他解释]

引用:

引用:C# code??12345678 public class TestTextBox : TextBox { protected override void OnClick(EventArgs e) { base.OnClick(e); this.Text ……

重新生成解决方案，之后工具箱里就有了
[其他解释]
继承TextBox，里面click或mousedown等事件中清空，这样你就在界面上用自定义的TextBox就行了
[其他解释]
该回复于2012-12-03 10:56:03被管理员删除
[其他解释]

引用:

C# code??12345678 public class TestTextBox : TextBox { protected override void OnClick(EventArgs e) { base.OnClick(e); this.Text = ""; } ……

谢谢

这个是要写一个新的类吗?
我又如何将这个继承的类放到窗体上去呢? 工具箱里面好像没有啊,是要用代码?
Dim WithEvents xxx as TestTextBox?
[其他解释]

引用:

C# code??12345678 public class TestTextBox : TextBox { protected override void OnClick(EventArgs e) { base.OnClick(e); this.Text = ""; } ……

++

看到了继承和重载的用途了

顶
[其他解释]
十分感谢,果然解决了,又学了一招

Public Class MyTextBox2
    '本类继承与textbox,在其基础上添加中键点击删除功能
    Inherits TextBox
    Private Sub MyTextBox2_MouseDown(sender As Object, e As MouseEventArgs) Handles Me.MouseDown
        If e.Button = Windows.Forms.MouseButtons.Middle Then

            Text = ""
            Focus()
        End If
    End Sub
End Class

热点排行

VB Dotnet

请教怎么为小弟我的程序中所有的textbox添加鼠标中键点击清空文本功能