Grafico en .net

[josemanuel31675]

Se que ando cercas pero me falta poder meterle los datos a mi grafico es la primera vez que lo realizo e revisado varios metodos pero en ninguno me grafica si me pudiesen ayudar se los agradeceria mucho

'aqui iniciamos la conexion de la base de datos con SQL
Dim conn As New System.Data.SqlClient.SqlConnection
conn.ConnectionString = ConfigurationManager.ConnectionStrings("Calidad_Bl ockConnectionString").ConnectionString
'Creamos un dataset
Dim MiDataSet As New System.Data.DataSet
Dim MiAdaptador As New System.Data.SqlClient.SqlDataAdapter
'abrimos la consulta
conn.Open()

Dim Consulta As String
Dim Julianofin As Integer
Consulta = "SELECT Juliano,Count(*) As Cant FROM Proceso_insp_visual Where Estatus=2 and Vigente=1 and Producto='"

If Me.J31.Text <> "" Then
Julianofin = Me.J31.Text
Else
Julianofin = Me.J30.Text
If Me.Calendar1.SelectedDate.Month = 2 Then
Julianofin = Me.J28.Text
End If
End If

Dim sql As String = String.Concat(Consulta, Me.Productos.SelectedValue & "' and Juliano Between " & Me.J1.Text, " and " & Julianofin & " Group by juliano")
'creamos un comando
Dim comando As New System.Data.SqlClient.SqlCommand(sql, conn)
MiAdaptador.SelectCommand = comando
MiAdaptador.Fill(MiDataSet)

Me.Grafico1.Titles.Add("Grafico Calidad Block 31 Dias")


If MiDataSet.Tables(0).Rows.Count <= 1 Then

Me.Grafico1.DataSource = MiDataSet

For Each objRow As DataRow In MiDataSet.Tables(0).Rows
Me.Grafico1.Controls("Julianos").DataBind()

Me.Grafico1.Series("Series1").XValueMember = sql.Contains("Juliano")

Me.Grafico1.Series("Series1").YValueMembers = sql.Contains("Cant")
Me.Grafico1.DataBind()







Next