Calendrier-date en gras

Question

Salut,
je voudrais prendre une valeur d'une listbox et afficher le date en gras dans le calendrier.
j'essaie de fabriquer qqchose comme
*********************
        Dim a As String = "2007, 9, 20"        'ou variable de la listbox
        Dim myVacation3 As Date = New System.DateTime(a)   '= ne marche pas - error conversion to long !!!!!!!!!!!
mais        Dim myVacation3 As Date New System.DateTime(2007,  9, 10)  ' marche sans probs !!!!!!!!!!!!
       
        Dim VacationDates As DateTime() = {myVacation3, myVacation4}
        MonthCalendar1.BoldedDates = VacationDates
'
        Me.MonthCalendar1.UpdateBoldedDates()
***********************
mais j'ai toujours le message qu'il est impossible de convertir le string "2007, 9, 20" en long
?????????????????
merci pour votre aide
Thomas

DblK · Answer

Je n'utilise casiment jamais ce contrôle mais pense au fonction de convertion.
Dans ton exemple essaye CLng("2007, 9, 20") ; regarde dans l'explorateur d'objet tu verras plein de fonction pour convertir d'un type à un autre.

DblK

goofy584 · Answer

Salut,
je ne veux pas convertir un string, mais utiliser une varialbe qui contient un string.
j'ai essaié deja Clng(a) mais ca ne marche pas. le message dit que le string "2007 , 9, 20" (le string de la variable a)  ne peut pas etre converti en long. si j'utilise le meme string direct (sans variable), ça marche.
????????????
merci
Thomas

DblK · Answer

Et si tu divisais ta chaine en trois, car 2 virgule dans un meme nombre c'est impossible (d'où l'erreur).
Tu fais DateTime(CLng(Chaine1), CLng(Chaine2), CLng(Chaine3)).

Cela devrait peut-être marcher, si c'est pas le cas, je vois rien d'autre

DblK

goofy584 · Answer

Salut,
ca marche ;-)
merci beaucoup!!!
@+
Thomas

Calendrier-date en gras

4 réponses

Votre réponse

Discussions similaires