questo è solo un esempio
codice:
Protected Sub cmd_emetti_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmd_emetti.Click
'in questa procedura salviamo i dati
Try
'Forza la validazione di tutti i controlli
'Me.Validate()
If Not Me.IsValid Then
Throw New Exception("La scheda non ha passato i controlli di validità.")
End If
If aggiungi Then
appendData()
Else
updateData()
End If
'messaggio in caso di successo
l.MsgBox(Me, "Dati immessi con successo.")
'leggo i dati
BindData()
Catch ex As Exception
'messaggio in caso di errore
l.MsgBox(Me, ex)
End Try
End Sub