WeekOfYear Résolu

Question

Bonjour, 
Après de nombreuses recherches infructueuse je vous pose à nouveau la question 
Comment faire apparaitre le N° de la semaine en VB Epress
Je sèche 
Merci D'avance

cs_Le Pivert · Answer

Bonjour,

voir cette exemple:

http://codes-sources.commentcamarche.net/source/browse/100641/WebBrowser/WebBrowser

ucfoutu · Answer

Bonjour,
Lorsque l'on "sèche", le premier réflexe est de consulter son aide (MSDN).
Ouvre-la à la rubrique Datepart. Tu y as ta réponse.

Et sous VB.Net, tu peux également utiliser l'objet Calendar, comme ici (toujours en consultant MSDN .... alors que je n'ai même pas VB.Net sur ma machine) :
https://msdn.microsoft.com/fr-fr/library/system.globalization.calendar.getweekofyear%28v=vs.110%29.aspx

PS : tu as posté dans le forum général de Visual Basic.
Veux-tu bien s'il te plait veiller dorénavant à ouvrir tes discussions dans le sous-forum adéquat ?
Les solutions sont différentes entre VB6, VB.Net, VBA et VBS. Il est donc très important de prendre le soin de choisir le sous-forum concerné.
 
________________________
Nul ne saurait valablement coder ce qu'il ne saurait exposer clairement.

ucfoutu · Answer

Ah !
- Tu as remercié pour la fonction DatePart
- Tu n'as pas répondu en ce qui concerne ton outil de développement, mais le code montré met en évidence que c'est du VB.Net (je vais déplacer cette discussion vers le sous-forum VB.Net, qui est le sous-forum adéquat)
- DatePart est une fonction héritée de VB6 et n'est pas celle recommandée en VB.Net. Je ne suis pas VB.Nettiste, mais sais qu'il faut éviter cela.
- tu as mis ce sujet en RESOLU, mais tu ferais fort bien de recommencer, en collant à VB.Net lui-même (le second des deux liens que je t'ai montrés plus haut).

cs_Le Pivert · Answer

Donc voici du pur VB.Net:

Option Strict On
Imports System.Globalization
Public Class Form1
    Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
        Dim madate As DateTime
        'entrez votre date
        madate = CDate("24/02/2016")

MessageBox.Show("Semaine: " & CultureInfo.InvariantCulture.Calendar.GetWeekOfYear(madate, CalendarWeekRule.FirstFourDayWeek, DayOfWeek.Monday), "Numero de semaine", MessageBoxButtons.OK, MessageBoxIcon.Information)

'date du jour
        MessageBox.Show("Semaine: " & CultureInfo.InvariantCulture.Calendar.GetWeekOfYear(DateTime.Today, CalendarWeekRule.FirstFourDayWeek, DayOfWeek.Monday), "Numero de semaine", MessageBoxButtons.OK, MessageBoxIcon.Information)
    End Sub
End Class 

Bonne fêtes de fin d'année à tous

Zermelo · Answer

Bonjour.
L'autre jour, chez Lasserre, j'ai lu que le nom n du jour d'une date d est donné par la relation

n = d.DayOfWeek.ToString

J'ai donc écrit le code

Public Class Accueil    Private Sub Accueil_Shown(sender As Object, e As System.EventArgs) Handles Me.Shown        Dim d As New DateTime(2016, 1, 1)        Dim n As String = d.DayOfWeek.ToString        MessageBox.Show(n)    End SubEnd Class

qui m'a renvoyé Friday, résultat immédiatement confirmé par mon calendrier mural. Alors, avec un brin d'avance, je vous souhaite à 
tous une bonne année.

WeekOfYear

5 réponses

Votre réponse