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

6 Surprising Benefits of Threat Intelligence

All sorts of threat intelligence is available on the web. Intelligence you can learn from, and use to anticipate and prepare for future attacks.

Join & Write a Comment

Suggested Solutions

This tutorial demonstrates one way to create an application that runs without any Forms but still has a GUI presence via an Icon in the System Tray. The magic lies in Inheriting from the ApplicationContext Class and passing that to Application.Ru…
I think the Typed DataTable and Typed DataSet are very good options when working with data, but I don't like auto-generated code. First, I create an Abstract Class for my DataTables Common Code.  This class Inherits from DataTable. Also, it can …
Access reports are powerful and flexible. Learn how to create a query and then a grouped report using the wizard. Modify the report design after the wizard is done to make it look better. There will be another video to explain how to put the final p…
This demo shows you how to set up the containerized NetScaler CPX with NetScaler Management and Analytics System in a non-routable Mesos/Marathon environment for use with Micro-Services applications.

708 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

11 Experts available now in Live!

Get 1:1 Help Now