Traduction du pseudo code au VB
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
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
-
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. -
à 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 -
je sais faire les déclarations sur vb mais après je ny arrive pas :(
-
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" -
-
-
-
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 -
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 -
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 -
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)) Thenne calculera que lorsque les trois textbox contiennent du numérique.
