begin process at 2010 02 10 05:38:41
  Trouver un code source :
 
dans
 
[ Dernières recherches ]
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 348
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
Toutes les sources de BennyB

 Sources de la même categorie

Source avec Zip Source avec une capture AYOUBPAD2009 par ayoube2009
Source avec Zip Source avec une capture PILOTAGE D'AFFICHEURS LCD SUR PORT SÉRIE OU USB par mays
Source avec Zip Source avec une capture TRAITEMENT DE TEXTE RTF par zozo14
FORMATAGE D'UNE CELLULE EXCEL VIA UNE SYNTAXE HTML par 8Tnerolf8
Source avec Zip DÉFILEMENT TEXTE par mimiZanzan
Toutes les sources de la catégorie Texte

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture EXPORT TABLEAU EXCEL EN BBCODE par nikovb
Source avec Zip Source avec une capture HEXA/ASCII AVEC POSSIBILITÉ DE FICHIER par XRaph
VBSCRIPT --> CONVERSION DE FICHIER TEXTE EN FICHIER EXCEL PA... par thorspark
Source avec Zip Source avec une capture Source .NET (Dotnet) GESTION DE DONNÉES AVEC ACCESS par fradimed
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...

Comparez les prix


Archos 5 (250 Go)
Entre 440€ et 440€

Visiter le guide achat

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode
 
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,967 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales
Outils Convertisseur VB/C# Snippets et scripts Outils en ligne La ToolBox
Communauté Programmation Photographie Technologie Newsgroups Emploi Forum Blogs
Guide d'achat Téléphonie mobile Image et son Informatique Bureautique Jeux vidéo
Logiciels Internet & Réseau Développement Market Android Jeux & Loisirs Graphisme Multimédia Sécurité Pilotes
Loisirs Cartes virtuelles Vidéos droles Jeux en ligne Géoguide AndroLib (Android Market)