高手来帮我看看这错误该怎样来改哦

weirui1231

我先用了:Dim binds As BindingSource = New BindingSource
        Dim dt As DataTable = New DataTable
        Dim da As Odbc.OdbcDataAdapter
        Dim Conn As New Odbc.OdbcConnection
        Conn = Me.comm.DBopen()
        da = New Odbc.OdbcDataAdapter(sSelectCmd, Conn)
        da.Fill(dt)
        binds.DataSource = dt
        Me.DgViewReportCode.DataSource = binds
        Me.BindingNavReportCode.BindingSource = bind
*********************************************************
然后在另外一个过程用了
           Dim dt1 As DataTable = New DataTable()
             dt1 = Me.DgViewReportCode.DataSource   '''这里报错
                    IsPaste = False
                    dt1.AcceptChanges()
报错为:"无法将System.Windows.Forms.BindingSource类型转换为System.Data.DataTable类型"

为什么会报这样的错啊......该怎样改了/???
(如果我把*以上的屏蔽,下面就没错了,但我不能屏蔽上面的任何代码哦)

nijiaoshaa

在你用DataAdapter对象填充时应该用数据集而不应该用表,修改成以下:
Dim binds As BindingSource = New BindingSource
        Dim ds As DataTable = New DataSet
        Dim da As Odbc.OdbcDataAdapter
        Dim Conn As New Odbc.OdbcConnection
        Conn = Me.comm.DBopen()
        da = New Odbc.OdbcDataAdapter(sSelectCmd, Conn)
        da.Fill(ds)
        binds.DataSource = ds.Tables(0)
        Me.DgViewReportCode.DataSource = binds
        Me.BindingNavReportCode.BindingSource = bind

另外一个过程用:
           Dim dt1 As DataTable = New DataTable()
             dt1 = Me.DgViewReportCode.DataSource
                    IsPaste = False
                    dt1.AcceptChanges()

weirui1231

谢谢楼上的兄弟回答哦...

  但是这样改了还是报一样的错误哦
   dt1 = Me.DgViewReportCode.DataSource

   dt1 的类型为"System.Data.DataTable" ,
  Me.DgViewReportCode.DataSource的类型为"System.Windows.Forms.BindingSource"

  这两个不匹配哦...转换不过来啊.........


  到底该怎么改哦...?