Enlazar Chart a tabla

Question

Hola. Tengo un chart que quiero enlazar con una tabla y así ver los datos de esta tabla en un gráfico. Escribí el código y funciona pero hay algunos detalles que no puedo solucionar. 

  Sub CargarChart()
        Dim conexion As New OleDbConnection
        Dim consulta As String
        Dim comando As New OleDbCommand
        Dim da As New OleDbDataAdapter
        Dim ds As New DataSet
        Dim dt As New DataTable
        Dim miView As DataView
        Dim Cartera As String
        Dim RenglonPago As String
        Dim RenglonFecha As String

        Me.Chart4.Series(0).Points.Clear()

        Cartera = ComboBox1.Text

        consulta = "SELECT * FROM BaseDePagos WHERE ClienteEmpresa = @cart"

        conexion.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=D:\GestOrg\GestOrgSolucion\GestOrg\DBGestOrg.accdb"
        conexion.Open()

        comando = New OleDbCommand(consulta, conexion)
        comando.Parameters.AddWithValue("@cart", cartera)

        da.SelectCommand = comando
        da.Fill(ds)
        dt = ds.Tables(0)

        RenglonPago = dt.Columns("MontoDelPago").ColumnName
        RenglonFecha = dt.Columns("FechaDePago").ColumnName

        Chart4.DataSource = dt

        miView = New DataView(dt)

        For x = 0 To miView.Count - 1

            Me.Chart4.Series(0).Points.AddXY(miView(x)(RenglonFecha), miView(x)(RenglonPago))
            Me.Chart4.Series(0).LegendText = "Pagos"

        Next

        conexion.Close()
        conexion.Dispose()
end sub

Desde ya les agradezco su ayuda.

---

Post MSDN