How to ignore MouseClick Event in VB.NET

Question

2.50/5 (2 votes)

See more:

Hi friends,

I have DataGridViewCheckBoxColumn cell in datagridview in my project.

I want the user to be able check DataGridViewCheckBoxColumn by clicking it when certain a condition is met.

When the condition is not met I expect the DataGridViewCheckBoxColumn to ignore the MouseClick_event.

I do not know the code I must place in the MouseClick_event handler to achieve this objective.

Any assistance would greatly appreciated.

Thanks in advance

Additional information copied from comment below
I thought there will be something like e.Handled as in KeyPress_Event.

For the purpose of clarity I have included my code

VB

If DataGridView1.CurrentCell.ColumnIndex = 9 Then
  'EventArgs.Empty = True
  Select Case e.Button
    Case (Windows.Forms.MouseButtons.Left) Or (Windows.Forms.MouseButtons.None) Or (Windows.Forms.MouseButtons.Middle)
    MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
    'EventArgs = Empty

    Case Windows.Forms.MouseButtons.Middle
    Case Windows.Forms.MouseButtons.Right
    Case Else
  End Select
End If

Posted 17-Jun-13 0:07am

noblepaulaziz

Updated 18-Jun-13 4:50am

Nelek

v3

Add a Solution

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Nelek · Answer 1 · 2013-06-17T00:20:00

Solution 1

For what you describe, the easiest way would be

C#

if condition != TRUE
  return

//here the rest of the code out of the if

or

C#

if condition == TRUE
{
  //your code here
}
else
  return

If that doesn't fit what you want to do... please use the "improve question" widget and explain it more detailed

OP's last comment with self-made workaround added here for other people
Thanks so much. I have found a handle to my problem. I just put the code(messagebox and making the cell readonly)to execute when the condition is not met. Complete routine is shown below:

VB

Private Sub DataGridView1_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles DataGridView1.MouseClick
  If (DataGridView1.CurrentCell.ColumnIndex = 12) Then
    If (DataGridView1.CurrentRow.Cells("TransType").FormattedValue.ToString.ToUpper <> "E") AndAlso (DataGridView1.CurrentRow.Cells("TransType").FormattedValue.ToString.ToUpper <> "D") Then
      'EventArgs.Empty = True
      Select Case e.Button
        Case Windows.Forms.MouseButtons.Left
          DataGridView1.CurrentCell.ReadOnly = True
          MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
          'EventArgs = Empty
        Case Windows.Forms.MouseButtons.Middle
          DataGridView1.CurrentCell.ReadOnly = True
          MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
          'EventArgs = Empty
        Case Windows.Forms.MouseButtons.Right
          DataGridView1.CurrentCell.ReadOnly = True
          MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
          'EventArgs = Empty 
        Case Else
          DataGridView1.CurrentCell.ReadOnly = False
      End Select
    Else
      DataGridView1.CurrentCell.ReadOnly = False
    End If
  End If
End Sub

Thanks so much for your assistance

Posted 17-Jun-13 0:20am

Nelek

Updated 21-Jun-13 4:13am

v2

Comments

noblepaulaziz 17-Jun-13 11:11am

Thank you Nelek. My problem is not how to code condition but the code to ignore the click event

Nelek 18-Jun-13 4:31am

If you get into the event and the first thing you do is an "empty" return, when the condition is not matched, is almost the same than ignoring the click-event but much easier. You are not ignoring the click of the mouse, you are just executing nothing when you don't want to.

noblepaulaziz 18-Jun-13 10:29am

Thank you for your response. That is exactly what I mean. I thought there will be something like e.Handled as in KeyPress_Event.

For the purpose of clarity I have included my code

If DataGridView1.CurrentCell.ColumnIndex = 9 Then
'EventArgs.Empty = True
Select Case e.Button
Case (Windows.Forms.MouseButtons.Left) Or (Windows.Forms.MouseButtons.None) Or (Windows.Forms.MouseButtons.Middle)
MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
'EventArgs = Empty

Case Windows.Forms.MouseButtons.Middle
Case Windows.Forms.MouseButtons.Right
Case Else
End Select
End If

Nelek 18-Jun-13 10:40am

You are welcome. I am curious as well, if what you meant is possible or not, but I am not the right one to say it (not a big programmer in VB). I just saw it on the easy way.

On the other hand... I would like to know... Is what I suggested solving your problem?

noblepaulaziz 18-Jun-13 12:46pm

No, both EventArgs.Empty = True and EventArgs.Empty raise compiler error

Nelek 19-Jun-13 4:19am

And just doing the return when you don't want to execute anything? Is it working?

noblepaulaziz 19-Jun-13 11:49am

Thanks so much. I have found a handle to my problem. I just put the code(messagebox and making the cell readonly)to execute when the condition is not met. Complete routine is shown below:

Private Sub DataGridView1_MouseClick(sender As Object, e As System.Windows.Forms.MouseEventArgs) Handles DataGridView1.MouseClick
If (DataGridView1.CurrentCell.ColumnIndex = 12) Then
If (DataGridView1.CurrentRow.Cells("TransType").FormattedValue.ToString.ToUpper <> "E") AndAlso (DataGridView1.CurrentRow.Cells("TransType").FormattedValue.ToString.ToUpper <> "D") Then
'EventArgs.Empty = True
Select Case e.Button
Case Windows.Forms.MouseButtons.Left
DataGridView1.CurrentCell.ReadOnly = True
MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
'EventArgs = Empty
Case Windows.Forms.MouseButtons.Middle
DataGridView1.CurrentCell.ReadOnly = True
MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
'EventArgs = Empty
Case Windows.Forms.MouseButtons.Right
DataGridView1.CurrentCell.ReadOnly = True
MessageBox.Show("Editing this column is not allowed for this transaction", Application.ProductName, MessageBoxButtons.OK, MessageBoxIcon.Error)
'EventArgs = Empty
Case Else
DataGridView1.CurrentCell.ReadOnly = False
End Select
Else
DataGridView1.CurrentCell.ReadOnly = False
End If
End If
End Sub

Thanks so much for your assistance

Nelek 21-Jun-13 10:13am

You are welcome, glad to help you find a workaround

TnTinMn 21-Jun-13 21:33pm

I hope that you realize that this method does not prevent the user from using the keyboard to enter the cell and change it's value. You may want to consider using the cell enter event. You may also want to consider using some method other thane a messagebox to notify the user. Messageboxes can become annoying really quick. Possibly a tooltip placed above the cell would be less obtrusive.