Visual Basic

Dim query1 as ienumerable(of Table1)

query1=(From t in context.table1 where t.quantity>0 select t).Tolist
query1.First.quantity-=3
query1=(From t in context.table1 where t.quantity>0 select t).Tolist

Dim parsedData = New List(Of String())()
        Using sr = New StreamReader("H:/test.csv")
            Dim line As String
            line = sr.ReadLine()

            Do While line IsNot Nothing
                Dim row() As String = line.Split(","c)
                parsedData.Add(row)
                line = sr.ReadLine()
            Loop
        End Using

        DataGridView1.ColumnCount = 6
        For i As Integer = 0 To 5
            Dim sb = New StringBuilder(parsedData(0)(i))
            sb.Replace("_"c, " "c)
            sb.Replace("""", " ")

            DataGridView1.Columns(i).Name = sb.ToString()
        Next i
        For Each row As String() In parsedData
            DataGridView1.Rows.Add(row)
        Next row

        DataGridView1.Rows.Remove(DataGridView1.Rows(0))

 Static counter = 0
Dim labels = {Lbl_roundscore1, Lbl_roundscore2, Lbl_roundscore3, Lbl_roundscore4}
Dim totals = {Lbl_total1, Lbl_total2, Lbl_total3, Lbl_total4}
labels(counter).Text = Txt_input.Text
totals(counter).Text = totals(counter).Text + labels(counter).Text
Txt_input.Text = String.Empty
counter = If(counter = labels.Count - 1, 0, counter + 1)