IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

C# Discussion :

Traduction d'un code VB en C#


Sujet :

C#

  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2004
    Messages
    59
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2004
    Messages : 59
    Par défaut Traduction d'un code VB en C#
    SLt à tous,

    Voilà j'ai tappé quelques lignes de code pour un prog
    relativement simple sous VB. Mais je n'arrive pas à trouver
    l'équivalent en C# : je connais mal les fonctions et notations spécifiques.

    J'aurai besoin d'un coup de pouce.

    VOICI LE CODE :

    Code vb.net : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    Public Class Form1
     
    Const TEXT_SIZE_LIMIT As Long = 6
    ----------------------------------------------------------------------------------------------------

    Code vb.net : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
     
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     
    Dim szString As String
    Dim noSpace As Long
     
     
    szString = TextBox1.Text
    noSpace = LenNoSpace(szString)
     
    If Len(szString) > TEXT_SIZE_LIMIT Then
     
    MsgBox("Votre chaine ne doit pas depasser > " & TEXT_SIZE_LIMIT & " caracteres") 
    Else
     
    Label1.Text = noSpace
     
    End If
     
    End Sub
    --------------------------------------------------------------------------------------------------------

    Code vb.net : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    22
    23
     
    Private Function LenNoSpace(ByVal s As String) As Long
     
    Dim i As Integer
    Dim compteur As Long
     
    compteur = 0
     
    For i = 1 To Len(s)
     
    If Mid(s, i, 1) <> " " Then
     
    compteur += 1 ' incrémentation compteur tant qu'il y a un caractère
     
    End If
     
    Next i
     
    Return compteur 'ou bien --> LenNoSpace = compteur
     
    End Function
     
    End Class

    Merci

  2. #2
    Membre confirmé Avatar de mr.net
    Profil pro
    Développeur informatique
    Inscrit en
    Février 2007
    Messages
    152
    Détails du profil
    Informations personnelles :
    Localisation : Sénégal

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Février 2007
    Messages : 152
    Par défaut
    je sai pas si jai repondu a ta kestion
    ---------------------------------------------------------

    string szString = TextBox1.Text;
    long noSpace;
    noSpace = LenNoSpace(szString);
    long TEXT_SIZE_LIMIT= 6;

    if((szString.Length)) > TEXT_SIZE_LIMIT)
    {
    MessageBox.Show("Votre chaine ne doit pas depasser > " + TEXT_SIZE_LIMIT + " caracteres");
    }
    else
    {
    Label1.Text = noSpace ;

    }



    ----------------------------------------------
    private long LenNoSpace(string MonString)
    {
    int i = 0;
    long compteur = 0;
    for (i; i < MonString.Length; i++)
    {
    if (MonString.Substring(i, 1) == "")
    compteur += 1;
    }
    return compteur;
    }

  3. #3
    Membre éprouvé

    Profil pro
    Inscrit en
    Mars 2006
    Messages
    90
    Détails du profil
    Informations personnelles :
    Âge : 39
    Localisation : Belgique

    Informations forums :
    Inscription : Mars 2006
    Messages : 90
    Par défaut
    c'est quand meme plus lisible avec les balises CODE.....

  4. #4
    Membre confirmé Avatar de mr.net
    Profil pro
    Développeur informatique
    Inscrit en
    Février 2007
    Messages
    152
    Détails du profil
    Informations personnelles :
    Localisation : Sénégal

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Février 2007
    Messages : 152
    Par défaut

    merci

  5. #5
    Membre averti
    Profil pro
    Inscrit en
    Décembre 2004
    Messages
    59
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Décembre 2004
    Messages : 59
    Par défaut
    J'ai 3 erreures :

    Une au signe : = de la constante TEXT_SIZE_LIMIT

    Il me met : "Identificateur Inconnue"

    Une dans l'instruction :

    if(szString.Length) > TEXT_SIZE_LIMIT

    Problème avec le signe > et aussi "attente d'un ;"

    Finalement :

    Le :"else" avec "attente d'un ;"

    Comment résoudre ces 3 problèmes alors que ton code me parait juste

  6. #6
    Membre averti
    Profil pro
    Inscrit en
    Janvier 2007
    Messages
    32
    Détails du profil
    Informations personnelles :
    Âge : 61
    Localisation : Belgique

    Informations forums :
    Inscription : Janvier 2007
    Messages : 32
    Par défaut
    Salut,

    j'ai trouvé ceci .. en cherchant tres peu

    http://www.codeproject.com/csharp/GBVB.asp

    bonne journée.

  7. #7
    Membre confirmé Avatar de mr.net
    Profil pro
    Développeur informatique
    Inscrit en
    Février 2007
    Messages
    152
    Détails du profil
    Informations personnelles :
    Localisation : Sénégal

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Février 2007
    Messages : 152
    Par défaut
    tu trouvera ke l'executable de convertion ne marche pas bien
    prend la peine de lire les commentaire ke les gar on laisser sur le site
    http://www.codeproject.com/csharp/GBVB.asp
    Merci..

    c'est kelke souci de parenthese
    f((szString.Length) > TEXT_SIZE_LIMIT)
    {....
    }
    else
    {...
    }

  8. #8
    Membre émérite
    Profil pro
    Inscrit en
    Avril 2007
    Messages
    764
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2007
    Messages : 764
    Par défaut
    if(szString.Length) > TEXT_SIZE_LIMIT
    Mettre les parenthèses au bon endroit :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    if (szString.Length > TEXT_SIZE_LIMIT)
    Tu as le droit, même sans connaître le C#, d'avoir un regard critique sur le bout de code qu'on te propose et de te dire que le double parenthèsage sur cette ligne était probablement une faute de frappe de la part de mr.net Il voulait probablement mettre la deuxième paire de parenthèse autour de l'expression complète !



    Une au signe : = de la constante TEXT_SIZE_LIMIT
    Si la ligne en question est bien :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    long TEXT_SIZE_LIMIT = 6;
    normalement il ne devrait pas y avoir d'erreur Vérifie bien les fautes de frappe (oui c'est bête, mais je ne vois vraiment pas où serait le problème sinon)

  9. #9
    Membre confirmé Avatar de mr.net
    Profil pro
    Développeur informatique
    Inscrit en
    Février 2007
    Messages
    152
    Détails du profil
    Informations personnelles :
    Localisation : Sénégal

    Informations professionnelles :
    Activité : Développeur informatique

    Informations forums :
    Inscription : Février 2007
    Messages : 152
    Par défaut


    cool
    Mr Astartee

    kelke erreur de frappe ou d'inatention

    merci

  10. #10
    Membre averti
    Profil pro
    Inscrit en
    Avril 2007
    Messages
    50
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations forums :
    Inscription : Avril 2007
    Messages : 50
    Par défaut
    c'est très intéressant tout ça, ç am'intéresse beaucoup vu que je suis débutant

  11. #11
    Membre éclairé Avatar de gdkenny
    Profil pro
    Inscrit en
    Juillet 2005
    Messages
    251
    Détails du profil
    Informations personnelles :
    Localisation : France, Haute Garonne (Midi Pyrénées)

    Informations forums :
    Inscription : Juillet 2005
    Messages : 251
    Par défaut
    Salut, sinon la traduction directement en ligne

    http://www.developerfusion.co.uk/uti...btocsharp.aspx

    lien déjà sur un post de ce forum...

Discussions similaires

  1. [COM] Traduction d'un code VB COM Excel vers PHP
    Par Copyright83 dans le forum Bibliothèques et frameworks
    Réponses: 2
    Dernier message: 14/10/2008, 10h32
  2. Traduction d'un code perl
    Par Zeusviper dans le forum Langage
    Réponses: 3
    Dernier message: 16/06/2008, 12h43
  3. traduction d'un code en vb.net
    Par nabilfaouzi dans le forum VB.NET
    Réponses: 2
    Dernier message: 04/03/2008, 11h05
  4. Traduction d'un code en C++ vers Delphi
    Par saidus dans le forum Langage
    Réponses: 3
    Dernier message: 06/11/2007, 16h55
  5. Réponses: 2
    Dernier message: 26/07/2007, 18h44

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo