Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

  1. #1
    Futur Membre du Club Avatar de wilder1626
    Homme Profil pro
    Étudiant
    Inscrit en
    décembre 2018
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 27
    Localisation : Canada

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : décembre 2018
    Messages : 12
    Points : 9
    Points
    9

    Par défaut VB6 - Numéro de semaine dans l'année

    Bonjour,

    J'ai un léger problème avec une partie de code qui me donne le numéro de la semaine de l'année.

    Sachant que la semaine débute le dimanche et se termine le samedi.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
     
      'lblWeek_number
        Dim iNumberOfTheWeek As Integer
     
        iNumberOfTheWeek = DatePart("ww", Now())
        lblWeek_number.Caption = iNumberOfTheWeek
    Normallement, en date d'aujourd'hui le 30 Décembre 2018, nous some la semaine 1 de l'année 2019. Parcontre, avec le code ci-haut, j'obtiens la semaine 53.

    comment puis-je régler le problème sans utiliser:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
     If iNumberOfTheWeek = "53" Then lblWeek_number = "1"
    Merci de votre aide.

  2. #2
    Rédacteur/Modérateur
    Avatar de ProgElecT
    Homme Profil pro
    Retraité
    Inscrit en
    décembre 2004
    Messages
    4 728
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 62
    Localisation : France, Haute Savoie (Rhône Alpes)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Communication - Médias

    Informations forums :
    Inscription : décembre 2004
    Messages : 4 728
    Points : 10 528
    Points
    10 528

    Par défaut

    Salut wilder1626, bienvenue sur DVP

    Il te faut intéresser au 4éme paramètre de la fonction DatePart

    vbUseSystem 0 Utilise la valeur API NLS.
    vbFirstJan1 1 Commence par la semaine incluant le 1er janvier (valeur par défaut).
    vbFirstFourDays 2 Commence par la semaine comportant au moins quatre jours dans la nouvelle année.
    vbFirstFullWeek 3 Commence par la première semaine complète de la nouvelle année.

    Cela devrait être donc: iNumberOfTheWeek = DatePart("ww", Now(),,vbFirstFourDays).

    Motif de l'édit:
    N'ayant pas VB6 sous la main, je me demande si il ne faut pas indiquer le 3éme paramètre, comme en vbScript, donc si cela bug iNumberOfTheWeek = DatePart("ww", Now(),vbMonday,vbFirstFourDays) devrait passer sans erreur.
    ProgElecT
    Soyez sympa, pensez -y
    Balises[CODE]...[/CODE]
    Balises[CODE=NomDuLangage]...[/CODE] quand vous mettez du code d'un autre langage que celui du forum ou vous postez.
    Le bouton en fin de discussion, quand vous avez obtenu l'aide attendue.
    ......... et pourquoi pas, pour remercier, un pour celui/ceux qui vous ont dépannés.

  3. #3
    Futur Membre du Club Avatar de wilder1626
    Homme Profil pro
    Étudiant
    Inscrit en
    décembre 2018
    Messages
    12
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 27
    Localisation : Canada

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : décembre 2018
    Messages : 12
    Points : 9
    Points
    9

    Par défaut

    Merci beaucoup pour ton aide ainsi que l'explication.
    Je confirme que les 2 façons fonctionnes bien.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Numéro de semaine dans le nom du fichier
    Par scofield69 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 26/02/2008, 17h33
  2. Nbre de semaine dans une année
    Par kickoune dans le forum Excel
    Réponses: 21
    Dernier message: 07/06/2007, 13h04
  3. nombre de semaine dans l'année
    Par bnreb10 dans le forum java.util
    Réponses: 18
    Dernier message: 26/09/2006, 12h43
  4. Réponses: 6
    Dernier message: 25/09/2006, 15h51
  5. [Calendar] Problème de numéro de semaine de l'année
    Par gaia_dev dans le forum java.util
    Réponses: 5
    Dernier message: 29/11/2004, 12h44

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo