Bon j'explique ma solution :
1 - Cocher dans le menu Projet/Composants : "Microsoft Calendar Control 8.0"
2 - Un form (form1) avec une textbox (text1) et le code suivant dedans :
Private Sub Text1_Click()
Form2.Show 1
Text1.Text = Form2.MaDate
End Sub
3 - Un form (form2) avec le controle Calendar (nommé Calendar1) dessus et le code suivant dedans :
Public MaDate As Date
Private Sub Calendar1_Click()
MaDate = Calendar1.Value
Unload Me
End Sub
Ainsi, quand on clique sur text1, ça appelle le calendrier et dès que la date est choisie, on a la date affichée.
Cordialement, CanisLupus