Salve a tutti
sto utilizzando un controllo mask edit per immettere una data, ma si comporta in modo un pò anomalo! Mi spiego : per vedere se l'utente ha digitato una data ammissibile faccio un test dove vedo se la stringa immessa è nulla, o se è una data ammissibile (isdate) inoltre controllo se la stringa contiene il mese 00 (viene accettato anche il mese 00).
La cosa drammatica è che sembra funzionare, ma se inserisco la data 10/21/2005 la data viene accettata come corretta (se controllo la finestra immediata la data che ha acquisito è 21/10/2005!!!!)
Ho provato anche a controllare da pannello di controllo le impostazioni sulla data, ma sono coerenti!!!
Vi posto il codice, potete aiutarmi?
Grazie in anticipocodice:Private Sub MaskEdBox1_LostFocus() If (IsDate(Format(Me.MaskEdBox1.Text, "dd/mm/yyyy")) = False Or Me.MaskEdBox1.Text = "__/__/____" Or Me.MaskEdBox1.Text = "__/00/____") Then MsgBox "Formato data non corretto.", vbOKOnly + vbCritical, "ATTENZIONE..." MaskEdBox1.SetFocus End If End Sub
![]()

).
)
Rispondi quotando
