Discussion :

[megamario]

bonjour, j'ai vraiment du mal à convertir une méthode qui avait été écrite en Vb6 pour la mettre en C#.net

Après plusieurs recherche et avoir utilisé un site de conversion qui me donnait plein d'erreur, je solicite votre aide.

Voici le code en VB6:

Code :

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
24
 
Public Function Supervision1(ByVal bit As Integer, ByVal indice As Integer) As Integer
        Dim nbc As Integer
        Dim line As String
        Dim Str As String
        Dim nbByte As Integer
        Dim i As Integer
        Dim Start As Integer
        Dim nval As Long
        Dim Oct As Integer
        Dim Rank As Integer
        On Error Resume Next
        Rank = indice
        nbc = Len(bit) Mod 2
        'Mise au format &Hxx -> on complète par 0 si besoin
        Str = IIf(nbc = 1, "0" & bit, bit)
        While Rank <= 31 And Len(Str) >= 8
            Str = Mid(Str, Len(Str) - 4)
            Rank = Rank - 16
        End While
        nval = Val("&H" & Str)
        i = Val(Str And CStr(Hex(2 ^ Rank)))
        Supervision1= IIf((nval And 2 ^ Rank) > 0, 1, 0)
    End Function

J'arrive pas à trouver l'équivalent de:
Len
et la mise au format Hex.


Merci de votre aide

[ppphil]

Une petite astuce que j'ai trouvé tout dernièrement :
1 ouvrir un nouveau projet VB (aaaatchoum ! Santé !)
2 copier ta fonction dans ce projet (différentes corrections vont déjà être effectuées)
3 éventuellement compiler et corriger
4 reprendre le code et le passer à la moulinette...
5 finir de corriger le code dans c#

Comme moulinette j'utilise Econ NetVert.

Évidemment un fonction comme len ne passera pas mais il y a des équivalents :
- pour un string : maString.Length
- pour un tableau idem
- etc...

[Guulh]

Il existe des convertisseurs en ligne VB.Net <=> C#. VB et VB.Net ne sont pas le même langage, mais leur syntaxe étant proche et ton bout de code étant relativement simple, ça vaut la peine d'essayer.

[megamario]

Merci pour vos réponses:

J'ai utilisé le site http://www.developerfusion.com/tools.../vb-to-csharp/

Il me trouve pas mal d'erreurs, des fonctions qu'il ne sais pas traduire et ce qu'il a converti ne correspond plus. Par exemple
Len(bit) bit etant un integer

il me le converti par Strings.Len(bit)

Auriez vous d'autre site de conversion, mais je vais cherché aussi de mon coté.

[megamario]

J'avoue que j'ai du mal à voir ce que voulait celui qui a crée la méthode en Vb6

Pour:

Len(bit)

Dans l'aide de Visual il indique que la méthode Len :Retourne un entier contenant le nombre de caractères contenus dans une chaîne ou le nombre nominal d'octets requis pour stocker une variable.

il parle d'une chaine effectivement ou le nombre nominal d'octets.

Vu que "bit" est un integer on a pas le nombre d'une chaine..!!

[Guulh]

A ta place, j'irais poser la question sur le forum VB, où tu trouveras plein de gens plus compétent qu'ici dans ce domaine