none
inverser des codes RRS feed

  • Question

  • bonjour, je voudrais de l'aide comment inverser des codes par exemple comme ceci :

    TEXTEBOX1 = 00 00 36 3A 1A 0F E6 A7 t convertir ds textebox2 = A7 E6 0F 1A 3A 36 00 00

    POUVEZ-VOUS M'aider a résoudre mon petit problème .merci

    lundi 2 septembre 2013 10:31

Réponses

  • bonjour, voici j'ai trouver la solution a mon probleme.

    TextBox2.Text = String.Join(" ", TextBox1.Text.Split(" ").Reverse())

    merci de votre aide.

    • Marqué comme réponse zorro591 mardi 3 septembre 2013 19:04
    mardi 3 septembre 2013 19:04

Toutes les réponses

  • Voici une application console qui fait ce dont vous avez besoin :
    Module Module1
    
        Sub Main()
            Dim text = "00 00 36 3A 1A 0F E6 A7"
            Dim block = text.Split(" ")
    
            Dim response = String.Empty
    
            For index = block.Count - 1 To 0 Step -1
                response &= block(index)
    
                If index <> 0 Then
                    response &= " "
                End If
            Next
    
    
            Console.Write(response)
    
            Console.Read()
    
        End Sub
    
    End Module

    lundi 2 septembre 2013 14:23
  • Bonjour,

    L'opération reverse ne serait-il pas mieux ?

            Dim text = "00 00 36 3A 1A 0F E6 A7".AsEnumerable.Reverse.ToArray        
    MsgBox(text)


    Cordialement,

    • Proposé comme réponse TroxsaEditor mardi 3 septembre 2013 07:36
    • Non proposé comme réponse TroxsaEditor mardi 3 septembre 2013 12:52
    mardi 3 septembre 2013 07:36
    Auteur de réponse
  • Bonjour,

    L'opération reverse ne serait-il pas mieux ?

            Dim text = "00 00 36 3A 1A 0F E6 A7".AsEnumerable.Reverse.ToArray        
    MsgBox(text)


    Cordialement,


    Si vous utilisez Reverse (Linq), vous allez recevoir 7A 6E ... Or, on veut ici juste inverser l'ordre des duos mais pas les duos eux-mêmes (A7 reste A7 et pas 7A)
    mardi 3 septembre 2013 10:45
  • Dans ce cas là il suffira de faire un petit changement sur le code pour faire l'adaptation 

            Dim text2 = "00 00 36 3A 1A 0F E6 A7".Split(" ").AsEnumerable.Reverse.ToArray        
    Console.WriteLine(String.Concat(text2))
    Et la valeur rechercher est bien la valeur obtenue ...


    Cordialement,

    • Proposé comme réponse TroxsaEditor mardi 3 septembre 2013 12:52
    mardi 3 septembre 2013 12:51
    Auteur de réponse
  • bonjour, voici j'ai trouver la solution a mon probleme.

    TextBox2.Text = String.Join(" ", TextBox1.Text.Split(" ").Reverse())

    merci de votre aide.

    • Marqué comme réponse zorro591 mardi 3 septembre 2013 19:04
    mardi 3 septembre 2013 19:04