IMPEDIRE LO SPOSTAMENTE DEL FOCUS IN CASO DI ERRORE
Uno dei principali problemi dei programmatori è costituito dalla verifica della correttezza delle informazioni digitate dall'utente.
Visual Basic viene in aiuto fornendo la gestione dell'evento .Validate, il quale viene eseguito ogni volta che il focus si deve spostare da un controllo a un altro, sempre che quest'ultimo abbia la proprietà .CausesValidation impostata con True ( è il default).
In pratica, quando l'utente si sposta su un altro controllo che ha la proprietà .CausesValidation attiva, viene generato l'evento .Validate, nel quale il programmatore può effettuare tutti i controlli necessari sui dati inseriti per autorizzare o negare lo spostamento del focus semplicemente operando attraverso il valore del parametro Cancel.
Nell'esempio seguente è visibile la subroutine di gestione della validazione di un componente di nome Text1, per il quale è richiesta una lunghezza superiore a 8 caratteri, altrimenti il focus non viene spostato :
Private Sub Text1_Validate(Cancel As Boolean)
'per poter spostare il focus, Text1 deve avere
'una lunghezza di almeno 8 caratteri
If Len(Text1) < 8 Then
'il focus non si deve spostare dal componente
Cancel = True
End If
End Sub