è sbagliata la costruzione della query...prova così

dim strSQL as string = "UPDATE tblUsers SET nome = '" & params(0) & "', cognome = '" & params(1) & "', indirizzo = '" & params(2) & "', citta = '" & params(3) & "', stato = '" & params(4) & "', zip = '" & params(5) & "', telefono = '" & params(6) & "’ WHERE id = " & Ctype(e.Item.Cells(0).Controls(1), Label).Text & "

koning