Les dates [VB6] - Programmation
Marsh Posté le 21-02-2001 à 09:43:31
Je vois pas trop ce que tu veux.
Private Sub Text1_LostFocus()
Dim D As Date
On Error Resume Next
D = CVDate(Text1 & "" )
If Err <> 0 Then
Beep
Text1.SetFocus
End If
On Error GoTo 0
End Sub
Marsh Posté le 21-02-2001 à 09:47:13
bonjour MID et merci
en fait, la fonction CVDate converti un texte en date, et retourne éventuellement une erreur, c'est bien cela ?
je vais tester dans l'heure prochaine
merci encore
Marsh Posté le 21-02-2001 à 12:46:17
y a également la fonction IsDate qui retourne un boolean
sinon utilise un OCX de date : y a ceux de MS fourni avec VB ou y a les Sheridans Date de Shersoft (http://www.shersoft.com)
Marsh Posté le 21-02-2001 à 09:03:40
j'ai une TexBox
je veux contrôler la saisie , pour valider une date
je veux ainsi contrôler les jours en fonction des mois et de l'année
Quelqu'un aurait l'algorithme ?
A moins que je doive utiliser quelque chose d'existant, tel qu'un OCX ?