For tt As Integer = 0 To Me.ListView1.Items.Count - 1
                If Me.ListView1.Items(tt).Checked = True Then
                    Me.ListView1.Items(tt).Selected = True
                    ObjC59.CodAlbergo = Convert.ToInt32(NAlb.Rows(0).Item("Codice"))
                    ObjC59.CodComAlbergo = Convert.ToInt32(NAlb.Rows(0).Item("CodComune"))
                    ObjC59.NumeroSchedina = Convert.ToInt32(Me.ListView1.SelectedItems(tt).Text)
                    ObjC59.Annogestionale = Date.Today.Year
                    ObjC59.DataElaborazione = Convert.ToDateTime(Me.ListView1.SelectedItems(tt).SubItems(1).Text)
                    C59Del.Elimina(ObjC59)
                  End If
            Next