读书人

请教怎么为小弟我的程序中所有的textb

发布时间: 2012-12-16 12:02:32 作者: rapoo

请问如何为我的程序中所有的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

热点推荐