Solved DataGridView1_CellContentClick(sender, e)

Posted on 2008-10-07
Last Modified: 2012-05-05
All I want to do is call this method after I leave a textbox but I get an error saying:
"Value of type System.Windows.Forms.KeyEventArgs cannot be converted to System.Windows.Forms.DataGridViewCellEventArgs

I am trying to call the method by using this:   DataGridView1_CellContentClick(sender,e)

'to call this:

Public Sub DataGridView1_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv.CellContentClick

'do this

end sub

I dont know what to do, pls help.
Question by:logoncom
LVL 96

Expert Comment

by:Bob Learned
ID: 22663953
If that is the right place to do that, then you need to create a new DataGridViewCellEventArgs instance, and pass that.
LVL 14

Accepted Solution

rachitkohli earned 500 total points
ID: 22666495
call like this :

Dim eNew as DataGridViewCellEventArgs
Call DataGridView1_CellContentClick(sender,eNew)

Author Comment

ID: 22668979
Ok, that gets me over to the event, but then I get "Object reference not set to an instance of an object".  

I am sending over  'vjobnumber' which is usually got from dgv_cellclick.  
vjobnumber = dgv.Rows(e.RowIndex).Cells(0).Value

So what I am trying to do is reverse the process.  since I have vjobnumber, I want to click  dgv.Rows(e.RowIndex).Cells(0).Value because when I click a specific cell something happens.


    Private Sub dgv_CellClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles dgv.CellClick

        If e.RowIndex > -1 Then


                Dim completevalue As Integer

                Select Case cbbfilter.Text

                    Case "Open Jobs"

                        completevalue = 1

                        vjobnumber = dgv.Rows(e.RowIndex).Cells(0).Value

                    Case "Completed Jobs"

                        completevalue = 2

                        vjobnumber = dgv.Rows(e.RowIndex).Cells(0).Value

                    Case "Billed Jobs"

                        completevalue = 3

                        vjobnumber = dgv.Rows(e.RowIndex).Cells(0).Value

                    Case "On Hold Jobs"

                        completevalue = 0

                        vjobnumber = dgv.Rows(e.RowIndex).Cells(0).Value

                    Case "Estimates"

                        completevalue = 5

                        JobsheetEstimateNumber = dgv.Rows(e.RowIndex).Cells(0).Value.ToString

                End Select


                panelhidecontrols.Enabled = True

                Panel3.Enabled = True

                btnjobsheet.ForeColor = Color.Red

                btnjobsheet.Enabled = True

                btnpostage.Enabled = True

                If completevalue = 0 Then

                    btneditjob.Enabled = True

                    btneditjob.ForeColor = Color.Red

                    btnBillJob.Enabled = False

                ElseIf completevalue = 1 Then

                    btneditjob.Enabled = True

                    btneditjob.ForeColor = Color.Red

                    btnBillJob.Enabled = False

                    btnservices.Enabled = True

                ElseIf completevalue = 2 Then

                    btnBillJob.ForeColor = Color.Red

                    btnBillJob.Enabled = True

                    btneditjob.Enabled = False

                ElseIf completevalue = 3 Then

                    btnBillJob.ForeColor = Color.Red

                    btneditjob.Enabled = False

                    btnBillJob.Enabled = True

                ElseIf completevalue = 5 Then

                    btnestjs.Enabled = True

                    btnopenest.Enabled = True

                    btnopenest.ForeColor = Color.Red

                    btnservices.Enabled = True

                    btnjobsheet.ForeColor = Color.Black

                    btnjobsheet.Enabled = False

                    btnrecreate.Enabled = False

                    btneditjob.Enabled = False

                End If


            Catch ex As Exception


            End Try

        End If

    End Sub

Open in new window


Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
Parsing a CSV file is a task that we are confronted with regularly, and although there are a vast number of means to do this, as a newbie, the field can be confusing and the tools can seem complex. A simple solution to parsing a customized CSV fi…
This is a video describing the growing solar energy use in Utah. This is a topic that greatly interests me and so I decided to produce a video about it.
A company’s greatest vulnerability is their email. CEO fraud, ransomware and spear phishing attacks are the no1 threat to a company’s security. Cybercrime is responsible for the largest loss of money to companies today with losses projected to r…

914 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now