Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
Bonne journée
Michel
Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
Bonne journée
Michel
Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
Bonne journée
Michel
wrote:
la fonction WeekDay est faite pour cela.
Cordialement;
michel.arnoux@gmail.com wrote:
la fonction WeekDay est faite pour cela.
Cordialement;
wrote:
la fonction WeekDay est faite pour cela.
Cordialement;
Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
wrote:Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
En une fonction bien propre:
Public Function MyWeekDayName(ByVal aDate As Variant, _
Optional ByVal abbreviate As Boolean = False)
As String
If IsDate(aDate) Then
MyWeekDayName = WeekdayName(Weekday(CDate(aDate), vbMonday), _
abbreviate, vbMonday)
End If
End Function
Et un exemple d'appel :
Dim s As String
Dim dwFull As String
s = Text1.Text
dwFull = MyWeekDayName(s)
If dwFull <> "" Then
MsgBox "le " & s & " est un " & dwFull & "."
End If
michel.arnoux@gmail.com wrote:
Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
En une fonction bien propre:
Public Function MyWeekDayName(ByVal aDate As Variant, _
Optional ByVal abbreviate As Boolean = False)
As String
If IsDate(aDate) Then
MyWeekDayName = WeekdayName(Weekday(CDate(aDate), vbMonday), _
abbreviate, vbMonday)
End If
End Function
Et un exemple d'appel :
Dim s As String
Dim dwFull As String
s = Text1.Text
dwFull = MyWeekDayName(s)
If dwFull <> "" Then
MsgBox "le " & s & " est un " & dwFull & "."
End If
wrote:Bonjour,
Je voudrais savoir s'il existe en VB une séquence relativement
permettant de déterminer si à une date (par exemple 9/05/1658)
correspond un lundi, mardi, ...
Merci de votre réponse
En une fonction bien propre:
Public Function MyWeekDayName(ByVal aDate As Variant, _
Optional ByVal abbreviate As Boolean = False)
As String
If IsDate(aDate) Then
MyWeekDayName = WeekdayName(Weekday(CDate(aDate), vbMonday), _
abbreviate, vbMonday)
End If
End Function
Et un exemple d'appel :
Dim s As String
Dim dwFull As String
s = Text1.Text
dwFull = MyWeekDayName(s)
If dwFull <> "" Then
MsgBox "le " & s & " est un " & dwFull & "."
End If