comment créer une calculatrice _visual basic_

-

projet calculatrice simple





Private Sub CommandButton1_Click()
 Dim var1 as integer;
 Dim var2 as integer;
 Image1.Visible = False;
 Image2.Visible = False;
 Image3.Visible = False;
 Image4.Visible = False;
 Image5.Visible = False;
 Image6.Visible = False;
var1 = Val(TextBox1.Text);
var2 = Val(TextBox2.Text);
TextBox3.Value = var1 + var2;
 End Sub


Private Sub CommandButton2_Click()
 Dim var1 as integer;
 Dim var2 as integer;
 Image1.Visible = False;
 Image2.Visible = False;
 Image3.Visible = False;
 Image4.Visible = False;
 Image5.Visible = False;
 Image6.Visible = False;
var1 = Val(TextBox1.Text);
var2 = Val(TextBox2.Text);
TextBox3.Value = var1 - var2;
 End Sub


Private Sub TextBox3_Change()
 If TextBox3 = 1 Then
 Image1.Visible = True;
 End If

 If TextBox3 = 2 Then
 Image1.Visible = True;
 Image2.Visible = True;
 End If

If TextBox3 = 3 Then
Image1.Visible = True;
Image2.Visible = True;
 Image3.Visible = True;
 End If
If TextBox3 = 4 Then
 Image1.Visible = True;
Image2.Visible = True;
 Image3.Visible = True;
 Image4.Visible = True;
End If
If TextBox3 = 5 Then
 Image1.Visible = True;
 Image2.Visible = True;
Image3.Visible = True;
 Image4.Visible = True;
 Image5.Visible = True;
 End If
If TextBox3 = 6 Then
 Image1.Visible = True;
 Image2.Visible = True;
Image3.Visible = True;
 Image4.Visible = True;
 Image5.Visible = True;
 Image6.Visible = True;
End If
End Sub

Private Sub CommandButton3_Click()
End
End Sub

Commentaires

Enregistrer un commentaire

Posts les plus consultés de ce blog

Uml diagramme de classe Exercice Corrigé

-
Exercice 1 Pour chaque exemple ci-dessous, indiquez si la relation présentée est une généralisation, une agrégation ou une association : Un pays a une capitale Une transaction boursière est un achat ou une vente Les fichiers contiennent des enregistrements Une personne utilise un langage de programmation dans un projet Les modems et les claviers sont des périphériques d’entrées/sorties   Exercice 2 Pour chaque situation ci-dessous, proposez une modélisation de la réalité. Une librairie vend des livres, caractérisés par leur auteur et leur nombre de pages ; certains livres possèdent également d’autres caractéristiques : une fourchette des âges pour les livres pour enfants, et la discipline et le niveau pour les livres scolaires. On considère une entreprise, et on suppose qu’un chef dirige plusieurs salariés (les subordonnés) et que le chef est lui-même un salarié. On considère une université, et les personnes y travaillant qui peuvent être des étudiants ou des enseignants. Exercice ...
Lire la suite

Different Types of Turbos

-
Different Types of Turbos One way to enhance the horsepower of a car's engine is with a turbocharger. This will enhance the overall  performance of the vehicle. A turbocharger allows an engine to produce similar power as that of a heavier engine. A turbocharger is a turbine driven forced induction device that injects extra air at increased pressure, temperature and density into an engine's combustion chamber; thus improving the engine's efficiency and horsepower. The exhaust gas that a turbocharger uses to operate is energy that is lost in a normally aspirated automobile engine. In cars, there are various types of turbochargers, and each has its own characteristics, drawbacks, and benefits. Single-Turbo The single turbocharger offers excellent variability and is a cost-effective method of increasing power in a car engine. It is relatively easy to install, and the addition of a single turbocharger produces the equivalent power as that of a larger and heav...
Lire la suite