Вывести на диаграмму Chart данные из DataGridView - Visual Basic .NET

Формулировка задачи:

Здравствуйте! Может кто подскажет, не как не могу понять как сделать. В общем в таблице есть столбец в котором можно писать только да, нет, не знаю, в общем ограниченное количество слов ,нужно сделать чтобы программа подсчитывала количество каждого слова и выводила на диаграмму в Chart в процентном выражении (пример: диаграмма выводит слово "да" 20%, слово "нет" 30%, слово "не знаю" 50%)

Решение задачи: «Вывести на диаграмму Chart данные из DataGridView»

textual
                            Листинг программы 
                        

                            'DataSet к этому моменту должна существовать (и иметь таблицу Clients)
Dim tb As DataTable = ds.Tables("Clients")
Dim n As Integer = tb.Rows.Count
Dim ss() As String = {"Реклама в средствах массовой информации", "Наружная реклама", _
                      "Реклама на транспорте", "Реклама на местах продаж", _
                      "Сувенирная реклама", "Печатная реклама", "Прямая реклама", _
                      "Реклама в интернете", "Другой"}
Dim dd(ss.Length - 1) As Double
For i = 0 To ss.Length - 1
    'интересуемые данные в поле с индексом 7 таблицы Clients
    dd(i) = (From s As DataRow In tb.Rows Where s(7).ToString = ss(i)).ToArray.Count / n * 100
Next
Dim dp(ss.Length - 1) As DataPoint
With Chart1
    .Width = 500
    .Height = 300
    .Titles.Add("в процентах")
    .ChartAreas.Clear()
    .ChartAreas.Add("ppp")
    .Series.Clear()
    .Series.Add("Реклама")
    .Series(0).IsVisibleInLegend = False
    .Series(0).Color = Color.Red
    For i = 0 To ss.Length - 1
        dp(i) = New DataPoint(i, dd(i))
        dp(i).AxisLabel = ss(i)
        .Series(0).Points.Add(dp(i))
    Next
End With
                        