De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain
Alain
Mille pardons. En fait, je croyais sincèrement que NbSlash ne concernait que les slashes et de ce fait je cherchais la syntaxe NBpointvirgule... P.S. J'ai honte.
Private Sub CommandButton60_Click() txt = TextBox11 For I = 1 To Len(txt) If Mid(txt, I, 1) = ";" Then NbSlash = NbSlash + 1 End If Next MsgBox NbSlash End Sub
"FxM" a écrit dans le message de news:
Bonjour Alain,
De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain
Mille pardons.
En fait, je croyais sincèrement que NbSlash ne concernait que les slashes
et de ce fait je cherchais la syntaxe NBpointvirgule...
P.S. J'ai honte.
Private Sub CommandButton60_Click()
txt = TextBox11
For I = 1 To Len(txt)
If Mid(txt, I, 1) = ";" Then
NbSlash = NbSlash + 1
End If
Next
MsgBox NbSlash
End Sub
"FxM" <fxmanceaux@chello.fr> a écrit dans le message de
news:e0vsuUxdEHA.3132@TK2MSFTNGP11.phx.gbl...
Bonjour Alain,
De la même manière que tu comptes les / ?
Hier n'est pas si loin :o)
@+
FxM
Alain wrote:
Bnnjour.
Je désire savoir comment compter les ; dans un textbox ?
Merci beaucoup
Alain
Mille pardons. En fait, je croyais sincèrement que NbSlash ne concernait que les slashes et de ce fait je cherchais la syntaxe NBpointvirgule... P.S. J'ai honte.
Private Sub CommandButton60_Click() txt = TextBox11 For I = 1 To Len(txt) If Mid(txt, I, 1) = ";" Then NbSlash = NbSlash + 1 End If Next MsgBox NbSlash End Sub
"FxM" a écrit dans le message de news:
Bonjour Alain,
De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain
Mille pardons. En fait, je croyais sincèrement que NbSlash ne concernait que les slashes et de ce fait je cherchais la syntaxe NBpointvirgule... P.S. J'ai honte.
Private Sub CommandButton60_Click() txt = TextBox11 For I = 1 To Len(txt) If Mid(txt, I, 1) = ";" Then NbSlash = NbSlash + 1 End If Next MsgBox NbSlash End Sub
"FxM" a écrit dans le message de news:
Bonjour Alain,
De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain
Mille pardons.
En fait, je croyais sincèrement que NbSlash ne concernait que les slashes
et de ce fait je cherchais la syntaxe NBpointvirgule...
P.S. J'ai honte.
Private Sub CommandButton60_Click()
txt = TextBox11
For I = 1 To Len(txt)
If Mid(txt, I, 1) = ";" Then
NbSlash = NbSlash + 1
End If
Next
MsgBox NbSlash
End Sub
"FxM" <fxmanceaux@chello.fr> a écrit dans le message de
news:e0vsuUxdEHA.3132@TK2MSFTNGP11.phx.gbl...
Bonjour Alain,
De la même manière que tu comptes les / ?
Hier n'est pas si loin :o)
@+
FxM
Alain wrote:
Bnnjour.
Je désire savoir comment compter les ; dans un textbox ?
Merci beaucoup
Alain
Mille pardons. En fait, je croyais sincèrement que NbSlash ne concernait que les slashes et de ce fait je cherchais la syntaxe NBpointvirgule... P.S. J'ai honte.
Private Sub CommandButton60_Click() txt = TextBox11 For I = 1 To Len(txt) If Mid(txt, I, 1) = ";" Then NbSlash = NbSlash + 1 End If Next MsgBox NbSlash End Sub
"FxM" a écrit dans le message de news:
Bonjour Alain,
De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain
Mille pardons. En fait, je croyais sincèrement que NbSlash ne concernait que les slashes
et de ce fait je cherchais la syntaxe NBpointvirgule... P.S. J'ai honte.
Private Sub CommandButton60_Click() txt = TextBox11 For I = 1 To Len(txt) If Mid(txt, I, 1) = ";" Then NbSlash = NbSlash + 1 End If Next MsgBox NbSlash End Sub
"FxM" a écrit dans le message de news:
Bonjour Alain,
De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain
Bien pris note.
Alain
"FxM" <fxmanceaux@chello.fr> a écrit dans le message de
news:%23MmqOcxdEHA.1604@TK2MSFTNGP11.phx.gbl...
Mille pardons.
En fait, je croyais sincèrement que NbSlash ne concernait que les
slashes
et de ce fait je cherchais la syntaxe NBpointvirgule...
P.S. J'ai honte.
Private Sub CommandButton60_Click()
txt = TextBox11
For I = 1 To Len(txt)
If Mid(txt, I, 1) = ";" Then
NbSlash = NbSlash + 1
End If
Next
MsgBox NbSlash
End Sub
"FxM" <fxmanceaux@chello.fr> a écrit dans le message de
news:e0vsuUxdEHA.3132@TK2MSFTNGP11.phx.gbl...
Bonjour Alain,
De la même manière que tu comptes les / ?
Hier n'est pas si loin :o)
@+
FxM
Alain wrote:
Bnnjour.
Je désire savoir comment compter les ; dans un textbox ?
Merci beaucoup
Alain
Mille pardons. En fait, je croyais sincèrement que NbSlash ne concernait que les slashes
et de ce fait je cherchais la syntaxe NBpointvirgule... P.S. J'ai honte.
Private Sub CommandButton60_Click() txt = TextBox11 For I = 1 To Len(txt) If Mid(txt, I, 1) = ";" Then NbSlash = NbSlash + 1 End If Next MsgBox NbSlash End Sub
"FxM" a écrit dans le message de news:
Bonjour Alain,
De la même manière que tu comptes les / ? Hier n'est pas si loin :o)
@+ FxM
Alain wrote:
Bnnjour. Je désire savoir comment compter les ; dans un textbox ? Merci beaucoup Alain