InvalidCastException не был обработан в VB.NET

Question

Ссылаясь на этот вопрос: StackOverflowException was unhandled in VB.NET Я решил создать новый вопрос, потому что у меня новая ошибка.

Невозможно привести объект типа 'System.Windows.Forms.BindingSource' к типу 'System.Data.DataTable'.

CODE (в случае щелчка кнопки):

' Copy rows from the first datagridview to the second datagridview that is data bound 
    ' First copy the second datagridviews datasource into a new data table 

    Dim dt As DataTable = CType(frmEncodeDatabase.EncodingDataGridView.DataSource, DataTable).Copy 
    Dim dr As DataRow 

    ' Loop through all rows of the first datagridview and copy them into the data table 

    For r As Int32 = 0 To Me.DataGridViewX1.Rows.Count - 1 
     If Me.DataGridViewX1.Rows(r).IsNewRow = False Then ' Do not copy the new row 
      dr = dt.NewRow 

      ' Loop through all cells of the first datagridview and populate the data row 

      For c As Int32 = 0 To Me.DataGridViewX1.ColumnCount - 1 
       dr(c) = Me.DataGridViewX1.Rows(r).Cells(c).Value 
      Next 

      dt.Rows.Add(dr) ' Add the data row to the data table 
     End If 
    Next 

    Me.DataGridView2.DataSource = dt ' Rebind the second datagridview with the new table which has all the rows from both datagridviews 
    frmEncodeDatabase.show() 

ошибка, которая находится в образе, в dt As DataTable = CType(frmEncodeDatabase.EncodingDataGridView.DataSource, DataTable).Copy где ошибка прямо сейчас. Как я могу изменить код?

Answer 1

Сообщение об ошибке самоподписывается.

"Unabled бросить объект типа 'BindingSource' ввести 'DataTable'."

datassource вашего DataGridView является BindingSource, так что вам нужно бросить в этот тип.

Dim bs As BindingSource = CType(frmEncodeDatabase.EncodingDataGridView.DataSource, BindingSource) 

Если предположить, что источник данных из BindingSource является DataTable:

Dim dt As DataTable = CType(bs.DataSource, DataTable) 

Если нет, то вы получите еще одно исключение броска, но теперь вы, как это исправить.