在按钮事件中,通常将MouseDoubleClick添加到窗体中时会包括在内,但是当我以编程方式将按钮添加到窗体中时,即使在我自己编写程序的过程中也不会出现任何错误,但即使在我自己编写程序的情况下,IDE建议事件中也不存在MouseDoubleClick,但是它不会不要在MouseDoubleClick事件上做任何事情
In Button events MouseDoubleClick is included when normally add it to the form but when I programmatically add buttons to the form MouseDoubleClick doesn't exist in IDE suggestion events even if I write by myself the program execute without any error but it doesn't do anything on MouseDoubleClick event
这是我的代码:
Dim pb As New Button pb.Text = "Hello" pb.Size = New Size(150, 110) frmAddImage.flPanel.Controls.Add(pb) AddHandler pb.MouseDoubleClick, AddressOf pbButton_MouseDoubleClick Private Sub pbButton_MouseDoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) 'Do something End Sub推荐答案
其归结为以下内容:按钮通常不使用双击事件. 但是,按钮类从提供双击事件的Control继承.这样就可以了,但是没有被班级解雇.
What it boils down to is the following: Buttons don't normally use the double-click event. The button class however inherits from Control which provides the double-click event. So it is there but it's not fired by the class.
您可以在MouseDown事件中使用MouseEventArgs变量的.Clicks属性:
You can use the .Clicks property of the MouseEventArgs variable in the MouseDown event though:
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click Dim pb As New Button pb.Text = "Hello" pb.Size = New Size(150, 110) frmAddImage.flPanel.Controls.Add(pb) AddHandler pb.MouseDown, AddressOf pbButton_MouseDown End Sub Private Sub pbButton_MouseDown(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) If e.Clicks = 2 Then MessageBox.Show("The button was double-clicked.") End If End Sub来自: social.msdn.microsoft/Forums/zh-CN/83ac6fbd-af42-4b9c-897e-142abb0a8199/can-not-use-event-double-click按钮上
一种 解决方法 是为按钮启用StandardClick和StandardDoubleClick ControlStyles.您需要创建自己的按钮类,并在构造函数中将标志设置为true. 然后,您可以处理DoubleClick(不是MouseDoubleClick)事件.
A workaround is to enable the StandardClick and StandardDoubleClick ControlStyles for the button. You need to create your own button class and set the flags to true in the constructor. Then you can handle the DoubleClick (NOT MouseDoubleClick) event.
Public Class MyButton Inherits Button Public Sub New() MyBase.New() SetStyle(ControlStyles.StandardDoubleClick, True) SetStyle(ControlStyles.StandardClick, True) End Sub End Class像以前一样将事件连接到另一个类中,只需创建一个MyButton而不是一个Button.
Wire the event up in your other class as before, just create a MyButton and not a Button.
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click Dim pb As New MyButton pb.Text = "Hello" pb.Size = New Size(150, 110) Me.Controls.Add(pb) AddHandler pb.DoubleClick, AddressOf pbButton_DoubleClick End Sub Private Sub pbButton_DoubleClick(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) MessageBox.Show("The button was double-clicked.") End Sub更多推荐
mousedoubleclick对于动态创建的按钮不起作用
发布评论