Paradigmes informatiques
Conversion entre VB et C++
19/07/2008
Il est possible de transformer du code procédural VB6 en code C++, les deux langages se ressemblant beaucoup sur ce point. Voici quelques équivalences afin de permettre de transformer des programmes d'un langage à un autre.
| Fontion | Visual Basic | C++ |
|---|---|---|
| Déclaration de variables | Dim varBool as Boolean Dim varChaine as String Dim varInt as Integer Dim varDouble as Double | bool varBool; AnsiString varChaine; int varInt; double varDouble; |
| Chaîne / Taille | Dim maChaine As String maChaine="Test" Dim tailleChaine as Integer tailleChaine=Len(maChaine) | AnsiString maChaine = 'Test'; int tailleChaine=maChaine.Length(); |
| Chaîne / Recherche de la position d'une sous-chaîne | If Instr(maVar,"e")>0 then | if (maVar.Pos('e')>0) { } |
| Chaîne / Extraction d'une sous-chaîne | Dim extraction as String extraction=Mid(maVar,3,len(maVar)) | AnsiString extraction; extraction=maVar.SubString(3, maVar.Length()); |
| Condition / Si-sinon-alors | If a=5 Then ... Else ... End If | if (a==5) { ... } else { ... } |
| Condition / Selon | select case NomVariable case "1":a=1 case "2":a=2 case else:a=3 end select | switch NomVariable.c_str() { case '1':a=1;break; case '2':a=2:break; default:a=3;break; } |
| Boucle / For | For Temp = 0 To UBound(tempstr) If CompareChaineIntervalle(texte, tempstr(Temp)) Then MultiCompare = True End If Next | for (Temp=0; Temp<= UBound(tempstr); Temp++) { if (CompareChaineIntervalle(texte, tempstr(Temp)) MultiCompare = true; } |
| Déclaration de fonction | Public Function FiltreChaine(ByVal Chaine As String, ByVal Filtre As String) As Boolean FiltreChaine=False End Function | bool FiltreChaine(AnsiString Chaine, AnsiString Filtre) { return false; } |
Dernière modification le 18/02/2019 - Quillevere.net
Commentaires
Aucune inscription n'est requise si vous souhaitez
Rechercher sur le site
  |  RSS |  Informations |