Oppure

Loading
18/10/07 11:18
mash_mash
Problema con l'istruzione Isdate :
vorrei che l'iserimento in una textbox sia interpretato come una data .
Ho preso come spunto questo codice che accetta solo valori numerici in una textbox :

Private Sub Textbox1_Change()
If IsNumeric(Textbox1.Text) Then
Textbox1.Text = Textbox1.Text
Else: msgbox ("inserimento non valido";)
End If
End Sub

e vorrei fare la stessa cosa per le date , ma la textbox anche se attiva non accetta nessun carattere , come mai ?

aaa
18/10/07 11:46
GrG
non ho capito bene,
tu vorresti ke la textbox accetti solo numeri??
Ultima modifica effettuata da GrG 18/10/07 11:46
aaa
18/10/07 11:51
BytE-FucK
Non ho capito qual è il problema?
Vuoi controllare se il testo immmesso in una text?
Se si fai cosi,se vuoi controllare al click di un command:k:


Private Sub Command1_Click()
If IsDate(Text1.Text) Then
Form1.Caption = "OK"
Else
Form1.Caption = "NO"
End If
End Sub




Se no spiegami mejo;)
aaa
18/10/07 12:09
LuigiBiasi
rispondendo alla domanda di mash_mash...
la isdate non la puoi fare nell'evento change, ma quando hai scritto tutta la data.
E' normale che non ti esca quello che scrivi, perchè quando scrivi un carattere per esempio 1 nell'evento change viene verificato se 1 è una data...
e 1 non è una data!
Perciò solo quando hai scritto tutto nella textbox puoi verificare se è il formato della data.
Io opterei x una soluzione migliore, cioè usare 3 text box, la prima per i giorni del mese, la seconda per i mesi e la terza per gli anni.
Ciao.
Ultima modifica effettuata da LuigiBiasi 18/10/07 12:11
aaa
18/10/07 12:12
mash_mash
ok , ora ci provo.
Nell'esempio del 1^ post controllavo l'inserimento di caratteri (solo numeri) nell'evento change della textbox.

Vorrei poter fare lo stesso con le date.
Ovvero : se digito una data (es. 18/10/07) la textbox mi accetta l'input altrimenti no.
aaa
18/10/07 12:16
LuigiBiasi
segui il codice di byte-fuck...
Private Sub Command1_Click()
If not IsDate(Text1.Text) Then
msgbox "inserisci la data"
text1.text = ""
End If
End Sub 
Ultima modifica effettuata da LuigiBiasi 18/10/07 12:19
aaa
18/10/07 16:00
BytE-FucK
Infatti,finche nn sara data,ma la data non la riconosce quindi cancella il carattere...
O fai con un timer(nn consogliato) oppure al click di un pulsante(consigliato):k:
aaa
19/10/07 12:37
P4p3r0g4
oppure ti crei tu una funzione..
in fondo non dovrebbe essere difficile creare una funzione che ti cntrolla che nel primo carattere ci sia un numero nel terzo una sbarra e via dicendo...
aaa