[jours d'une semaine] en visual basic Résolu

Question

Bonjour,

Je cherche une méthode pour connaitre tous les jours d'une semaine donnée en langage VB. 

Par exemple en ayant vcomme donnée la semaine 29 de l'année 2008 connaitre:

14 juillet
15 juillet
...
19 juillet

Si quelqu'un connait la solution je le remercie par avance.

Bonne journée @ tous

Polux31 · Answer

bonjour,

J'ai trouvé ça sur : https://vb.developpez.com/faq/?page=Dates , ça peut t'aider.

Public Function InvDatePart(ByVal PosJour As Integer, ByVal NumSemaine As Integer, ByVal Annee As Integer) As Date
   
    Dim tmpDate As Date

    tmpDate = CDate("1/1/" & Format$(Annee))
    If Weekday(tmpDate, vbMonday) < 6 Then NumSemaine = NumSemaine - 1
    tmpDate = DateAdd("ww", NumSemaine, tmpDate)
    tmpDate = DateAdd("d", PosJour - Weekday(tmpDate, vbMonday), tmpDate)
    InvDatePart = tmpDate

End Function
Par exemple, InvDatePart(3, 10, 2004) vous renvoie la date correspondant au troisième jour de la dixième semaine de l'année 2004.

;o)
polux

Utilisateur anonyme · Answer

Merci beaucoup c'est précisément ce que je recherchais tu ma bien rendu service merci encore.

Bonne soirée !

Polux31 · Answer

de rien, content de t'avoir aidé à résoudre ton blème ...

bonne continuation.

;o)

polux

[jours d'une semaine] en visual basic

3 réponses

Discussions similaires

Newsletters