[khaled12345]

(01-06-17, 03:42 AM)alma2 كتب :

كود :

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

       chart1.Series.Clear()
       chart1.Series.Add("الأعمار")
       chart1.Series("الأعمار").Color = Color.Green

       For Each r As DataRow In dt.Rows
           chart1.Series("الأعمار").Points.AddXY(r("Name"), r("Age"))
       Next

   End Sub

تمام تمام أستاذي

 والله مش عارف اقول لحضرتك ايه بصراحة

انت فعلا رجل رائع رائع رائع أستاذي الحبيب  alam2

تسلم ايديك وربنا يبارك في حضرتك

وبالفعل اتعلمت من حضرتك حاجات كتيييير جدا