Ce calendrier vous donne la possibilité de l'exploiter dans vos applis depuis un champs texte ou label et vous pouvez passez la date a laquel il doit se fixer et vous recevez la date choisie par l'utilisateur et ca avec juste une variable. De plus les jours fériés (pour la france) et les week-end sont de couleurs differentes Juste une form et les outils de base vb et un module. Ca n'est vraiment pas compliqué et ca s'adresse aux débutant.
Ceux qui utilise mon prog CDList connaissent ce calendrier.
Bonne prog a tous !
JLN
Source / Exemple :
Exemple d'appel depuis un textbox par double-clique avec locked=true et la variable Public Calend
Private Sub Text1_DblClick()
On Error GoTo ErrDate
Calend = Text1.Tag
If Calend = "" Then Calend = Format(Now, "dd/mm/yyyy")
frmCalendrier.Show vbModal
If Calend <> "" Then
Text1.Tag = Calend
Text1.Text = Format(Calend, "long date")
End If
Text1.SelStart = Len(Text1.Text)
Text1.SelLength = 0
SortieErrDate:
On Error GoTo 0
Exit Sub
ErrDate:
' Traitement des erreurs
Screen.MousePointer = vbDefault
MsgBox "Une erreur est survenue lors de la modification de la date, veuillez verifier votre système et si cela persiste, veuillez prévenir l'auteur en précisant l'erreur, merci." & vbCrLf & vbCrLf & "Erreur : " & Err & " : " & Error, vbCritical + vbOKOnly, "Erreur dans la date"
Resume SortieErrDate
End Sub
Conclusion :
Plus simple tu meurs !
P.S. J'ai placé ce source dans control bien que ca n'en soit pas un mais tout de même ca s'en approche.
www.gratinet.fr.st
JLN
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.