16
Programmazione / Message prepotente!
« il: 10 Settembre 2019, 12:23:28 »Codice: [Seleziona]
Public Sub txtIndirizzo_LostFocus()
txt = txtIndirizzo.Text
If Len(txt) > 2 Then
If f.TrovaNum(txt) = False Then
txt = txt & " "
Message.Info("Manca il numero civico!", "OK")
txtIndirizzo.Text = txt
txtIndirizzo.Pos = Len(txt)
txtIndirizzo.SetFocus
Endif
Endif
End
Il codice sopra esegue solo la riga txtIndirizzo.SetFocus dopo Message.Info. Se commento Message.Info invece esegue tutto il codice. Qualcuno mi sa dire perchè?