Hocalar veritabanından chart grafigine istatistik çekiyorum. kullanıdıgım kod aşagıda :

[code]baglanti.Close()
Dim komut As New OleDbCommand("select * from gelirler", baglanti)
Dim dr As OleDb.OleDbDataReader
baglanti.Open()
dr = komut.ExecuteReader

If dr.Read = True Then
Dim komut5 As New OleDb.OleDbCommand("SELECT * FROM gelirler where tarih ='" & dr("tarih") & "' order by id; ", baglanti)
Dim oku5 As OleDb.OleDbDataRe