Dim TotRighe As Integer = DataGridViewAggancio.Rows.Count - 1
                For righe = 0 To TotRighe
                    If DataGridViewAggancio.Rows(righe).Cells("Selezione").Value = True Then
                        MessageBox.Show("la commessa " & DataGridViewAggancio.Rows(righe).Cells("IdCommessa").Value & " è stata selezionata", "selezione", MessageBoxButtons.OK, MessageBoxIcon.None)

                    ElseIf DataGridViewAggancio.Rows(righe).Cells("Selezione").Value = False Then
                        MessageBox.Show("la commessa " & DataGridViewAggancio.Rows(righe).Cells("IdCommessa").Value & " non è stata selezionata", "selezione", MessageBoxButtons.OK, MessageBoxIcon.Asterisk)
                    End If
                Next