Ho una maschera con un campo data, quando l'utente inserisce la data voglio che venga fatto un controllo su di essa per verificare il suo formato, ovvero: gg/mm/aaaa in caso contrario deve dare un messaggio di errore.
Grazie.
Ho una maschera con un campo data, quando l'utente inserisce la data voglio che venga fatto un controllo su di essa per verificare il suo formato, ovvero: gg/mm/aaaa in caso contrario deve dare un messaggio di errore.
Grazie.
Esiste la funzione VB IsDate() che ti restituisce True o False a seconda che il parametro che le passi e' una data o no, solo che accetta anche il formato anglosassone con il mese prima del giorno (il formato mm/dd/yyyy per intenderci), pero' puoi usare la funzione Format() per modificare l'input come piu' ti piace.
...and I miss you...like the deserts miss the rain...
Dall'ultima volta che ci siamo sentiti è passato un po' di tempo
Ho trovato questo esempio nella guida VBA di access ma purtroppo non mi vuole funzionare, qualcuno sa aiutarmi?
Private Sub VerificaData_Click()
Dim strData As String
strData = InputBox("Immettere la stringa da visualizzare come data.")
If IsDate(strData) Then
MsgBox "La data è: " & Format(DateValue(strData), "Data estesa")
Else
MsgBox "Il valore immesso non è una data."
End If
End Sub
L'errore che mi restituisce è:
Errore di compilazione: Prevista variabile o routine e non progetto.
Per l'esattezza l'errore si trova al rigo dove inizia il ciclo If "If IsDate....." e mi evidenzia il metodo IsDate.
Grazie,
ciao.
Ciao, prova a fare cosi:
If VBA.IsDate(strData) Then
Jupy
Grazie mille, funziona. Adesso devo solo sistemare il formato.
Grazie,
ciao.![]()