Solved

how to get to underlying datarow from datagridview

Posted on 2012-12-21
14
1,384 Views
Last Modified: 2012-12-21
I have a windows form that has a bound datagridview, which also has a checkbox column that is not bound.  I run through the gridview and get each row that is checked.  What I need to do then is to get to the underlying datatable that corresponds to this datagridview row.  The dataset table has been filtered before being bound to the datagrid.

thanks
0
Comment
Question by:mgmhicks
  • 7
  • 7
14 Comments
 
LVL 83

Expert Comment

by:CodeCruiser
Comment Utility
Is there a primary key column? If yes, get value of that cell and then you can get the underlying datarow using

Dim drow As DataRow() = dTable.Select("PrimaryColumnName=" & ValueFromGrid)
0
 

Author Comment

by:mgmhicks
Comment Utility
For i = 0 To gvItems2.Rows.Count - 1
            If gvItems2.Rows(i).Cells(0).FormattedValue.ToString = "True" Then
                Dim myRow As DataRow = dsRoomItems.Tables(1).Select("ID=" & gvItems2.Rows(i).Cells(1).Value.ToString)

            Else

            End If

        Next

getting "Value of type '-1-dimensional array of system.data.datarow' cannot be converted to 'system.data.datarow'

any Ideas?
0
 
LVL 83

Accepted Solution

by:
CodeCruiser earned 500 total points
Comment Utility
Select returns a Datarow array hence I had ()

 Dim myRow As DataRow() = dsRoomItems.Tables(1).Select("ID=" & gvItems2.Rows(i).Cells(1).Value.ToString)
0
 

Author Comment

by:mgmhicks
Comment Utility
ok, almost there.  Here is the code I am running.  I am trying to move selected items in grid2 to items in grid1 then remove the items in grid2.  Not quite working leaving the 2nd item in the 2nd grid.  How can I change.  Thanks


        Dim i As Integer = 0
        Dim mystr() As String
        Dim myRow As DataRow()
        For i = 0 To gvItems2.Rows.Count - 1
            If gvItems2.Rows(i).Cells(0).FormattedValue.ToString = "True" Then

                myrow = dsRoomItems.Tables(1).Select("ID=" & gvItems2.Rows(i).Cells(1).Value.ToString)
                dsRoomItems.Tables(0).ImportRow(myRow(0))
                'dsRoomItems.Tables(1).Rows.Remove(myRow(0))
            Else
            End If
        Next

        Dim mRow As DataGridViewRow


        For Each mRow In gvItems2.Rows
            If mRow.Cells(0).FormattedValue.ToString = "True" Then
                myRow = dsRoomItems.Tables(1).Select("ID=" & mRow.Cells(1).Value.ToString)
                'dsRoomItems.Tables(0).ImportRow(myRow(0))
                dsRoomItems.Tables(1).Rows.Remove(myRow(0))
            Else
            End If
        Next
0
 

Author Comment

by:mgmhicks
Comment Utility
i receive this error trying to remove the selected items from the grid view:
Additional information: Index was out of range. Must be non-negative and less than the size of the collection.

Here is the code:
 For i = 0 To gvItems2.Rows.Count - 1
            If gvItems2.Rows(i).Cells(0).FormattedValue.ToString = "True" Then
                myRow = dsRoomItems.Tables(1).DefaultView.Item(i).Row
                myRow.Delete()
                i = i - 1
            Else
            End If
        Next
0
 
LVL 83

Expert Comment

by:CodeCruiser
Comment Utility
It can be any of the indexed items such as rows, cells, datatables that you are accessing using index. Do you have 2 DataTables inside the dsRoomItems dataset?
0
 

Author Comment

by:mgmhicks
Comment Utility
yes, so I select from grid2 copy to grid1 then want to remove from grid2, dsroomitems has 2 tables 1 to grid1 and 2 to grid 2
0
How to improve team productivity

Quip adds documents, spreadsheets, and tasklists to your Slack experience
- Elevate ideas to Quip docs
- Share Quip docs in Slack
- Get notified of changes to your docs
- Available on iOS/Android/Desktop/Web
- Online/Offline

 
LVL 83

Expert Comment

by:CodeCruiser
Comment Utility
Try following

 For i = 0 to gvItems2.Rows.Count - 1
            If gvItems2.Rows(i).Cells(0).FormattedValue.ToString = "True" Then
                myRow = dsRoomItems.Tables(1).DefaultView.Item(i).Row
                myRow.Delete()
            Else
            End If
        Next


i is automatically decremented in a for loop.
0
 

Author Comment

by:mgmhicks
Comment Utility
CodeCruiser that is what I was trying before I added the I = I-1 what I think is going on is that indexed or rows.count get messed up once I remove the row from the dataset.  Will removing it from grid instead take care of the underlying table?
0
 
LVL 83

Expert Comment

by:CodeCruiser
Comment Utility
Try following then


For i = gvItems2.Rows.Count - 1 To 0 Step -1
            If gvItems2.Rows(i).Cells(0).FormattedValue.ToString = "True" Then
                myRow = dsRoomItems.Tables(1).DefaultView.Item(i).Row
                myRow.Delete()
            Else
            End If
        Next
0
 

Author Comment

by:mgmhicks
Comment Utility
this code sends both selected items over to grid1 however, grid 2 only get rid of 1 item, the 2nd in the checkedlist items, and leaves it checked.   Before the change both items would go over then leave the 2nd one in grid2.   Has got to be something with the index changing in datatable after removing an item.

But still getting same index error.
0
 
LVL 83

Expert Comment

by:CodeCruiser
Comment Utility
Index does change after deleting a row but that is why we are starting at the end and progressing to start so that index change does not affect us.
0
 

Author Comment

by:mgmhicks
Comment Utility
looks like it is working now.  This seems a lot harder than what it is on a web form and datagrid, but I think we got it.  Not sure why it would be so hard, maybe it would be easier if I  bound that column.  Thank you very much. Your the best!!
0
 
LVL 83

Expert Comment

by:CodeCruiser
Comment Utility
Glad to help. I find winforms easier than webforms though :-)
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

Most everyone who has done any programming in VB6 knows that you can do something in code like Debug.Print MyVar and that when the program runs from the IDE, the value of MyVar will be displayed in the Immediate Window. Less well known is Debug.Asse…
Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

762 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

5 Experts available now in Live!

Get 1:1 Help Now