Una famiglia di sistemi di gestione per database relazionali di Microsoft progettati per semplificare l'uso.
ciao Lucio,
ti ho creato un esempietto al volo che non ha molte pretese...
in pratica prima di aggiornare il singolo controllo della form e subform effettui un controllo che ti impedisce di lasciarlo non compilato...
qui : http://1drv.ms/1CQ6e6n id4.accdb.
in pratica su evento prima di aggiornare richiami una sub :
If setControl2(Me.NomeCategoria) Then pmsgbox ("nomeCategoria"): Cancel = True
questa :
Public Function setControl2(ctrl As Access.Control) As Boolean
If IsNull(ctrl.Value) Then setControl2 = Not setControl2
End Function
per cui se il controllo non è compilato restituisce vero di conseguenza lanci quest'altra sub:
Sub pmsgbox(strCtrl As String)
Dim strMsg As String
Dim style As VbMsgBoxStyle
strMsg = "attenzione, " & strCtrl & " non compilato"
style = vbCritical
VBA.MsgBox strMsg, style, strMsg
End Sub
che costruisce un messaggio di avvertimento
il cancel=true annulla l'evento e resti lì finchè non compili il controllo....
niente di che.... :-)
HTH.
Sandro.