En poursuivant votre navigation sur ce site, vous acceptez l'utilisation de cookies pour vous proposer des contenus et services adaptés. Mentions légales.

Recherche

Recherche

Les mémos

Je débute...

Visites

 1225003 visiteurs

 12 visiteurs en ligne

Nous contacter

Contact

Inverser une chaîne

Inverser une chaîne de caractères

Alternative à la fonction "StrReverse" apparue avec Access 2000

Public Function fStrReverse(ByVal sIn As String) As String
    Dim nC As Integer, sOut As String

    For nC = Len(sIn) To 1 Step -1
        sOut = sOut & Mid(sIn, nC, 1)
    Next nC

    fStrReverse = sOut

End Function

Catégorie : Les mémos - String
Page lue 3880 fois
Vous êtes ici :   Accueil » Inverser une chaîne