Traduction du pseudo code au VB

jejecycle Messages postés 4 Statut Membre -  
Heliotte Messages postés 1561 Statut Membre -
Bonjour,

Je suis étudiant mph et en ce moment j'utilise visual basic à l'IUT mais je ne comprends pas grand chose... J'arrive à peu près à faire un programme en pseudocode sur papier mais dès qu'il faut traduire ce programme sur vb je n'y arrive pas du tout... (mon partiel sur vb étant déja passé jpense avoir une très mauvaise note :-( et je dois pourtant absolument comprendre comment cela fonctionne car jsuis totalement perdu pouvez me dire ou est ce que je pourrais trouver des infos pour passer du pseudocode à vb? merci davance

7 réponses

  1. Heliotte Messages postés 1561 Statut Membre 92
     
    Je te propose de créer ton formulaire, quatre labels et trois textbox, comme ceci.
    	ecrire ("donner le prix") ' renommer: label_PrixBrut
    	lire (prix) ' renommer: textbox_PrixBrut
    	ecrire ("donner TVA") ' renommer: label_TauxTVA
    	lire (TVA) ' renommer: textbox_TauxTVA
    	ecrire ("donner nb d'articles")	' renommer: label_NbArticles
    	lire (nbarticles) ' renommer textbox_NbArticles
    	ecrire ("le prix total est", prix TTC) ' renommer: label_PrixTTC
    1
  2. Heliotte Messages postés 1561 Statut Membre 92
     
    Bonsoir jejecycle,

    Si tu me donne un pseudo-code (algorithme) et que je te le traduit en VB pour toi, est-ce cela t'aidera-t-il ?
    Si oui, poste-le ici et j'essaierais de le traduire seulement si ton code n'est pas trop gros (pas un programme complet).

    Je n'ai pas beaucoup de temps ce soir, et demain non plus.
    Mais on pourrait commencer demain soir .. ça te va ?

    P.S.: Quel Visual Basic, car j'ai le VB 6.0 et Studio Visual Basic 2008.
    0
  3. jejecycle Messages postés 4 Statut Membre
     
    à l'IUT jai le studio visual basic 2010, a oui ça serait très sympa comme ça j'aurais un exemple pour une forme alors voici un énoncé par exemple :
    "Ecrire un programme qui lit le prix HT
    d'un article, le nombre d'articles et le
    taux de TVA, et qui fournit le prix total
    TTC correspondant. Faire en sorte que
    des libellés apparaissent clairement lors
    de l'affichage du résultat"

    le pseudocode est :

    Déclaration: prix en réel
    nbarticles en entier
    TVA en réel
    prix TTC en réel
    Debut:
    ecrire ("donner le prix")
    lire (prix)
    ecrire ("donner TVA")
    lire (TVA)
    ecrire ("donner nb d'articles")
    lire (nbarticles)
    prix TTC <= ((1+ TVA/100)*prix)*nbarticles
    ecrire ("le prix total est", prix TTC)
    fin
    0
    1. Heliotte Messages postés 1561 Statut Membre 92
       
      "prix TTC" >>> n'est pas une variable. Pour qu'une variable puisse être correctement orthographié, une variable doit tenir en un seul mot ..
      plutôt écrire : prixTTC ou prix_TTC
      Je m'occupe de la suite...
      0
  4. jejecycle Messages postés 4 Statut Membre
     
    je sais faire les déclarations sur vb mais après je ny arrive pas :(
    0
    1. Heliotte Messages postés 1561 Statut Membre 92
       
      je sais faire les déclarations sur vb mais après je ny arrive pas
      On sait le faire ou on sait pas le faire.

      Alors, que ce soit pour un module ou pour la feuille de code qui accompagne le formulaire, les bon principe est d'ajouter "Option Explicit" dans le coin supérieur gauche d'une feuille de code .. De cette façon, une variable utilisée mais non déclarée fera râler le compilateur et t'avertira, de manière certaine, qu'il existe au moins une variable utilisée mais non déclarée (ceci pour éviter d'utiliser une variable de type Variant).

      Ensuite, vient la déclaration des variables. Celle-ci doit, le plus souvent possible être déclarée dans une procédure ou une fonction.
      La différence entre une procédure et une fonction, est, qu'une fonction retourne quelque chose tandis que procédure ne retourne rien. Une procédure, par exemple est utilisée pour afficher, écrire dans un fichier texte. Une fonction est plutôt utilisée pour, par exemple, calculer et retourner le résultat de ce calcul.

      Les variables dans les procédures et les fonctions:
      - Principalement déclarée avec l'instruction "Dim" suivi du nom de la variable, ainsi que de son type. Dans le cas où une variable déclarée n'a pas de type, Visual Basic va donner son type d'office, un fourre-tout en quelque sorte, et ce fourre-tout, on l'appelle Variant.
      Donc, pour déclarer une variable "Numero", il faut écrire: "Dim Numero As Integer"
      0
    2. jejecycle Messages postés 4 Statut Membre
       
      daccord jusque la ça va je suis :) merci :)
      0
    3. Heliotte Messages postés 1561 Statut Membre 92
       
      Tu travaille avec les formulaires ?
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. Heliotte Messages postés 1561 Statut Membre 92
     
    Cliquer sur le formulaire .. Arriver dans la feuille de code, cette procédure doit apparaître :
        Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load 
    
        End Sub
    0
  7. Heliotte Messages postés 1561 Statut Membre 92
     
    Dans cette feuille de code, il faut créer un évènement qui se déclenchera à chaque changement de valeur d'une des trois premières "TextBox":
    Private Sub ChangementValeur(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles textbox_PrixBrut.TextChanged, textbox_TauxTVA.TextChanged, textbox_NbArticles.TextChanged
            Dim NbArticles As Integer = 0, prix As Double = 0.0, TVA As Double = 0.0, prixTTC As Double = 0.0
            '
            If (IsNumeric(textbox_PrixBrut.Text) And _
               IsNumeric(textbox_TauxTVA.Text) And _
               IsNumeric(textbox_NbArticles.Text)) Then
                prix = textbox_PrixBrut.Text
                NbArticles = textbox_NbArticles.Text
                TVA = textbox_TauxTVA.Text
                ' calcul
                prixTTC = ((1 + (TVA / 100)) * (prix * NbArticles))
                label_PrixTotal.Text = "le prix total est " & prixTTC.ToString
            End If
        End Sub
    0
  8. Heliotte Messages postés 1561 Statut Membre 92
     
    Cette procédure se déclenchera à chaque changement de valeur d'une des trois "TextBox", mais, grâce à la condition:
    If (IsNumeric(textbox_PrixBrut.Text) And _
               IsNumeric(textbox_TauxTVA.Text) And _
               IsNumeric(textbox_NbArticles.Text)) Then
    ne calculera que lorsque les trois textbox contiennent du numérique.
    0