Torna al Thread
Try
' controllo se ci sono iscritti per continuare con l'operazione
If Me.Registro_iscrittiBindingSource.Count > 0 Then
'chiedo conferma dell'operazione
Dim result As DialogResult
result = MessageBox.Show("Annullare la domanda di cancellazione ?", "Controllo applicazione", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly, False)
'Se si proseguo
If result = Windows.Forms.DialogResult.Yes Then
'annullando la domanda di cancellazione setto il checked del DB a false perche il campo non è editabile
Domanda_di_cancellazioneCheckBox.Checked = False
'Annullando la domanda di cancellazione devo settare la data a NULL perche il campo non è editabile
Data_domanda_cancellazioneTextBox.Text = ""
'Annullando la domanda di cancellazione devo settare l'operatore che ha effettuato la domanda a NULL perche il campo non è editabile
Operatore_domanda_cancellazioneTextBox.Text = ""
'Termino la modifica dei dati
Me.Registro_iscrittiBindingSource.EndEdit()
'Effettuo l'aggiornamento al DB
Me.Registro_iscrittiTableAdapter.Update(Me.AlboDataSet.Registro_iscritti)
'Riattivo tutti i controlli
Panel1.Enabled = True
Panel2.Enabled = False
Registro_iscrittiDataGridView.Enabled = True
End If
End If
Catch ex As Exception
MessageBox.Show("Errore : " & ex.Message, "Controllo errori", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly, False)
Application.Exit()
End Try