masque de saisie de Date pour TextBox

Bonjour,

J'aimerais bien savoir comment faire un masque de saisie pour un TextBox pour un format de date, comme : __/__/____

Sinon, un lien vers un tutoriel, ou juste le nom de propriétés à modifier fera l'affaire. :)

Merci d'avance.

Bonjour

est ce que cela repond a ta question ? msdn dateTime

Cordialement

Nasty

Merci d'avoir pris le temps pour répondre :)
Les codes VB dans le lien sont :

Code:

1
2
3
4
5
6
7
8
9
 
' Visual Basic (Déclaration)
Public Shared Function TryParseExact ( _
    s As String, _
    format As String, _
    provider As IFormatProvider, _
    style As DateTimeStyles, _
    <OutAttribute> ByRef result As DateTime _
) As Boolean

' visual basic utilisation

Code:

1
2
3
4
5
6
7
8
9
Dim s As String
Dim format As String
Dim provider As IFormatProvider
Dim style As DateTimeStyles
Dim result As DateTime
Dim returnValue As Boolean
 
returnValue = DateTime.TryParseExact(s, _
    format, provider, style, result)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
Dim enUS As New CultureInfo("en-US") 
Dim dateString As String
Dim dateValue As Date
 
' Parse date with no style flags.
dateString = " 5/01/2009 8:30 AM"
If Date.TryParseExact(dateString, "g", enUS, _
                      DateTimeStyles.None, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
' Allow a leading space in the date string.
If Date.TryParseExact(dateString, "g", enUS, _
                      DateTimeStyles.AllowLeadingWhite, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
 
' Use custom formats with M and MM.
dateString = "5/01/2009 09:00"
If Date.TryParseExact(dateString, "M/dd/yyyy hh:mm", enUS, _
                      DateTimeStyles.None, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
' Allow a leading space in the date string.
If Date.TryParseExact(dateString, "MM/dd/yyyy hh:mm", enUS, _
                      DateTimeStyles.None, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
 
' Parse a string with time zone information.
dateString = "05/01/2009 01:30:42 PM -05:00" 
If Date.TryParseExact(dateString, "MM/dd/yyyy hh:mm:ss tt zzz", enUS, _
                      DateTimeStyles.None, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
' Allow a leading space in the date string.
If Date.TryParseExact(dateString, "MM/dd/yyyy hh:mm:ss tt zzz", enUS, _
                      DateTimeStyles.AdjustToUniversal, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
 
' Parse a string represengting UTC.
dateString = "2008-06-11T16:11:20.0904778Z"
If Date.TryParseExact(dateString, "o", CultureInfo.InvariantCulture, _
                               DateTimeStyles.None, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
 
If Date.TryParseExact(dateString, "o", CultureInfo.InvariantCulture, _
                      DateTimeStyles.RoundtripKind, dateValue) Then
   Console.WriteLine("Converted '{0}' to {1} ({2}).", dateString, dateValue, _
                     dateValue.Kind)
Else
   Console.WriteLine("'{0}' is not in an acceptable format.", dateString)
End If
' The example displays the following output:
'    ' 5/01/2009 8:30 AM' is not in an acceptable format.
'    Converted ' 5/01/2009 8:30 AM' to 5/1/2009 8:30:00 AM (Unspecified).
'    Converted '5/01/2009 09:00' to 5/1/2009 9:00:00 AM (Unspecified).
'    '5/01/2009 09:00' is not in an acceptable format.
'    Converted '05/01/2009 01:30:42 PM -05:00' to 5/1/2009 11:30:42 AM (Local).
'    Converted '05/01/2009 01:30:42 PM -05:00' to 5/1/2009 6:30:42 PM (Utc).
'    Converted '2008-06-11T16:11:20.0904778Z' to 6/11/2008 9:11:20 AM (Local).
'    Converted '2008-06-11T16:11:20.0904778Z' to 6/11/2008 4:11:20 PM (Utc).

à vrai dire, je suis un grand débutant, pouvez vous m'expliquer où je dois déclarer ce code, dans le textboxChange ? Load de form ? module ?
Merci d'avance !

hum grand debutant! c'est pas la MSDN qu'il faut lire mais LE tuto

Cordialement

Nasty

Pourquoi ne pas utiliser le control MaskedTextBox ? :roll:

@nasty : J'avoue que le tuto de Mr. Plasserre est le plus complet parmi ceux que j'ai lu/je lis. Mais il faut du temps pour le compléter vu qu'il est assez volumineux.

@benito9253: Ahah ! c'est ça ce que je cherchais, le MaskedTextBox , merci !

Résolu.