Dim txtPunteggio1 As TextBox = GrdScheRig.Rows(e.RowIndex).Cells(3).Controls(0)
    Dim txtPunteggio2 As TextBox = GrdScheRig.Rows(e.RowIndex).Cells(4).Controls(0)

    Dim Id_ScheRig As String = GrdScheRig.Rows(e.RowIndex).Cells(0).Text
    Dim Punteggio1 As Double = Convert.ToDouble(txtPunteggio1.Text)
    Dim Punteggio2 As Double = Convert.ToDouble(txtPunteggio2.Text)
    cQueryUpd = "UPDATE ScheRig set Punteggio1 =" & Punteggio1 & "," & _
                "Punteggio2 = " & Punteggio2 & " " & _
                "where Id_ScheRig = " & Id_ScheRig

    sqlexec(cQueryUpd, lblErrore) 'mia SUB che esegue la query e segnala eventuali errori lato server in una label 
    GrdScheRig.EditIndex = -1
    riempigriglia(GrdScheRig, cQuery, "ScheRig") 'altra mia SUB che provvede a popolare la Griglia.I parametri sono: nome oggetto, query, nometabella