| maison  | Hardware  | réseaux  | programmation  | Logiciel  | Dépannage  | systèmes |  
programmation  
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Programmation Java

  • Programmation JavaScript

  • PHP /MySQL Programmation

  • programmation Perl

  • Programmation Python

  • Ruby Programming

  • Visual Basics programmation
  •  
    Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
    Comment faire pour supprimer des accents dans une chaîne VB6
    Il ya plusieurs personnages différents qui représentent un accent. Les graves , des accents tilde et aigus sont représentés par un caractère spécial sur la lettre dans le mot. Bien qu'il n'y ait pas beaucoup de mots anglais avec des accents , il existe plusieurs en français et en espagnol. Lors de la réception ou l'envoi de données en français ou en espagnol à partir de Visual Basic soit une base de données ou une autre application écrite dans un autre langage de programmation , il peut être nécessaire d'enlever l' accent devant l'autre application peut traiter. Instructions
    1

    Créer un nouveau EXE programme Visual Basic standard . Ajouter la capacité de lire et traiter les données dans un fichier externe en sélectionnant « projet» et « Références ». Cochez la case à côté de " Microsoft Scripting Runtime " et cliquez sur "OK " pour enregistrer . Cela donne l' accès au programme de l'API Windows pour la gestion des fichiers
    2

    déclarer deux variables: . Une comme " FileSystemObject » et l'autre comme un « TextStream " :

    Dim FOSO comme New Scripting.FileSystemObject

    oMyFile As Scripting.TextStream

    Ensuite , ouvrez le fichier pour la lecture dans le TextStream .

    Set oMyFile = oFSO.OpenTextFile ( FileName, ForReading )

    déclare également une variable pour stocker chaque ligne de la TextStream comme « sLineRead As String. "
    3 processus de

    la ligne de fichier texte en ligne dans une boucle écrite que " While Not oMyFile.AtEndOfStream . " Réglez " sLineRead " égale à une ligne de texte à partir de la TextStream :

    sLineRead = oMyFile.ReadLine

    S'il ya des accents contenus dans " sLineRead " vous pouvez les remplacer par une autre valeur à l'aide de VB " remplacer" méthode .
    4

    Identifier le caractère accentué à être éliminé . Par exemple , un texte contenant "E" peut être remplacé par "e" avant d'afficher ou insérer les données dans une base de données :

    sLineRead = Replace ( sLineRead , "E" , "e" ) < br >

    Cette ligne de code remplace toutes les occurrences de "e" avec "e" dans la ligne de texte lu dans " sLineRead " sans changer les données d'origine .

    Previous :

    next :
      articles connexes
    ·Comment créer une table dans VB.NET 
    ·Comment utiliser TextBox dans Visual Basic 6.0 
    ·Comment centrer un objet sur ​​un formulaire dans Visua…
    ·Comment calculer les heures et minutes dans VB6 
    ·Comment faire pour créer un gestionnaire d' erreur pou…
    ·Comment créer une icône lors de l'installation de Vis…
    ·Comment changer de type TryParse dans VBScript 
    ·Quels types de données variables sont stockées dans u…
    ·Comment se connecter à une base de données Visual Bas…
    ·Comment développer des applications Web en utilisant M…
      articles en vedette
    ·Comment fermer les programmes en C 
    ·Comment faire pour obtenir des valeurs dans une liste d…
    ·Comment faire pour supprimer tous les gestionnaires d'é…
    ·Comment appeler un sous-programme en son sein en Visual…
    ·Qu'est-ce sont des caractères spéciaux dans le codage…
    ·Comment obtenir une réponse d'un Messagebox 
    ·Comment faire de Quartus compilation plus rapide 
    ·Comment ajouter des boutons à une applet Java 
    ·Comment puis-je pousser un chemin vers Unix variable d'…
    ·Comment faire pour empêcher JavaScript d'être consult…
    Copyright © Connaissances Informatiques http://fr.wingwit.com