Handpuzzles.com


Comment écrire un code égalité pour la calculatrice standard à VB6

Comment écrire un code égalité pour la calculatrice standard à VB6

Rédaction d'un programme de calcul standard dans Visual Basic est un bon exercice pour débutants programmeurs Visual Basic. Une calculatrice de base contient des chiffres «0» à «9», un bouton de signe, un bouton de la virgule décimale, un bouton clair, un bouton et les boutons égale pour effectuer une addition, soustraction, multiplication et division. Les contrôles CommandButton sont placés sur un formulaire et un minimum de code est écrit pour chaque événement de clic de bouton pour le programme. Les résultats sont affichés dans un contrôle zone de texte en haut de la forme.

Instructions


•  Ouvrez votre calculatrice projet Visual Basic. Le projet devrait contenir des contrôles CommandButton pour les chiffres «0» à «9», un bouton pour le signe du nombre, un bouton décimal, un bouton clair, un bouton et les boutons égal pour effectuer l'opération mathématique déterminée.

•  Déclarez une variable de type "double" de tenir la première valeur entrée et la deuxième valeur entrée, si ce ne est déjà déclaré. Faire la variable «privé» à la forme. Veillez également il ya des variables booléennes déclarés de savoir quel type d'opération est en cours d'exécution. Une valeur booléenne est vraie ou fausse. Dim DFirst privé comme Double Dim privée dSecond que Double Dim Badd que Boolean Dim bSubtract as Boolean

•  Store cliqué sur le chiffre dans la variable "DFirst" dans l'événement click de l'opérateur mathématique. Capturer aussi qui touche le fonctionnement a été sélectionné et définir la valeur booléenne en conséquence. Par exemple, si le bouton "plus" a été cliqué, réglez Badd à "true". Si les touches de fonctionnement ont été définies dans un tableau, le code ressemblerait à ceci: Select Case d'index 0 BDivision = True Case 1 bMultiply = True Case 2 bSubtract = True Case 3 Badd = True End Select

•  magasin la deuxième valeur est entré en "bSecond» et alors écrire une "Déclaration Si" pour effectuer l'opération sur les deux chiffres et afficher le résultat dans le "Equals" clic de bouton code d'événement. La "Déclaration Si" se écrit "Si Badd Puis txtResult.text = DFirst + dSecond End If" où "txtResult" est le contrôle de la zone de texte en haut de la forme.




        

Publish my comment