begin process at 2012 02 11 06:45:57
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Texte

 > CONVERSION DE CHAÎNE

CONVERSION DE CHAÎNE


 Information sur la source

Note :
3 / 10 - par 2 personnes
3,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Texte Classé sous :conversion, chaine, effet Niveau :Débutant Date de création :18/01/2002 Date de mise à jour :18/01/2002 15:06:39 Vu :2 803

Auteur : BennyB

Ecrire un message privé
Site perso
Commentaire sur cette source (2)
Ajouter un commentaire et/ou une note

 Description

Cette fonction permet de passer de "jEaN dELAMOTTE" à "Jean Delamotte"

Source

  • Public Function Convert(nom As String) As String
  • Dim b, correct As String
  • Dim n
  • name = LCase(nom)
  • correct = UCase(Mid(nom, 1, 1))
  • For n = 2 To Len(nom)
  • b = Mid(nom, n, 1)
  • If Mid(nom, n - 1, 1) = " " Then
  • b = UCase(b)
  • End If
  • correct = correct & b
  • Next
  • Convert = Trim(correct)
  • End Function
Public Function Convert(nom As String) As String

Dim b, correct As String
Dim n
    name = LCase(nom)
    correct = UCase(Mid(nom, 1, 1))
    
    For n = 2 To Len(nom)
        b = Mid(nom, n, 1)
        If Mid(nom, n - 1, 1) = " " Then
            b = UCase(b)
        End If
        correct = correct & b
    Next
    Convert = Trim(correct)
    
End Function 



 Sources du même auteur

Source avec Zip Source avec une capture GÉNÉRATEUR DE CITATIONS

 Sources de la même categorie

Source avec Zip Source avec une capture MASQUE DE SAISIE NUMÉRIQUE par acive
Source avec Zip Source .NET (Dotnet) COMPTEUR DE NOMBRE DE MOTS DANS UN TEXTE par alpha5
Source avec Zip Source avec une capture HM - BLOCNOTE par hassenmajor
Source .NET (Dotnet) [VB.NET] CLASS DE COLORATION SYNTAXIQUE "ON THE FLY" par huzima
Source avec Zip Source avec une capture PERSONNALISEZ VOS BOÎTES DE MESSAGE (X)HTML par medjahedScript

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture CONVERTISSEUR HEXAVIGÉSIMAL par shaeks
Source avec Zip Source avec une capture CONVERTIR DU TEXTE RTF EN CODE HTML ET VICE-VERSA par vicosta
Source avec Zip Source .NET (Dotnet) CONVERSION DE DEVISE MONAITAIRE VIA UN SERVICE WEB par bigmonkey7
Source avec Zip Source .NET (Dotnet) CONVERTIR UN CHIFFRE EN LETTRE par badis1043
Source avec Zip Source avec une capture TRADUCTEUR VB6.VBP EN VB5.VBP par joro

Commentaires et avis

Commentaire de KevinK le 21/03/2002 14:10:23

    J'ai trouvé un autre moyen pour faire ça, dites-moi ce que vous en pensez:
Public Function Convert(nom As String) As String
Dim a() As String
nom = LCase(nom)
a = Split(nom)
   For i = 0 To UBound(a)
    a(i) = UCase(Left(a(i), 1)) & Right(a(i), Len(a(i)) - 1)
   Next
Convert = Join(a)
End Function

Commentaire de KevinK le 13/05/2002 15:42:37

Autant pour moi, y'en encore mieux:

          Nom=strConv(Nom,vbProperCase)

  Et c'est tout !!!

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Conversion d'un nombre entier en une chaine de caractère [ par Janot ] Ben, je n'arrive pas à trouver la fonction qui convertit un nombre entier en une chaine de caractères (je connaîs seulement Val qui fait l'inverse).Me Help : Conversion de String en variable [ par Traxdata ] Si kkun pourrai m'indiquer comment convertir une chaine de caractère en une expression ou en une variable, bref un truc du genre :dim x as integer, y Conversion chaine de caracteres en un nombre entier [ par tntdavid ] Je voudrais connaitre le code VB d'une fonction qui me permettrait de convertir une chaine de 6 caractères en un nombre entier.Merci d'avance de l'att conversion d'une trame en une chaine de caractère [ par jujunio ] Bonjour, je débute en Vb et je travaille sur un projet avec une communication sur port série.J'arrive bien à lire la trame que je recois et à l'affich Conversion de chaine [ par willytito ] Bonjour jà tous !Je voudrei convertir une chaine de caractère en crarctère grasExiste-il une fonction pour réaliser celàMerciWilly Probleme conversion [ par dirickles ] Slt a ts,G un enorme probleme,Mes fonctions de conversion ne fonctionne plu,cad kil m affiche des erreurs kan j apelle une fonction de conversion.Ex : conversion chaine de caractere en hexa [ par obionekenobi ] je voudrais calculer un cheksum d'un fichier .j'ai recuperé un octet "FF"dans une string et je veux le transformer en hexa puis l'ajouter avec le suiv Problème de conversion d'une date en chaine de caractères [ par Serialsiner ] Bonjour à tous,Je butte sur un problème avec VBA dans Excel (97), je cherche à sélectionner une plage de cellules si le contenu es Conversion Chaine Java C# [ par moreau_l ]    Bonjour à tous, Je fais communiquer par socket un prog java et un prog en C#. Ils s'échangent des chaines de caractères & conversion chaine de caractére en nombre [ par michto ] Ceci n'est pas une question ( c'est une astuce mais je ne savais pas ou la mettre...c'est pas un code !!). Pour convertir une chaine en nombre, plusie


Nos sponsors


Sondage...

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,515 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales