Private Sub berechnen_Click(ByVal sender As System.Object, ByVal e As _
   System.EventArgs) Handles berechnen.Click
        For i As Integer = 0 To DataGridView2.Rows.Count - 1
            Gesamt.Text = i + 1
        Next i