Un convertisseur €uro super style

Télécharger le projet
Commenter

Description

C'est tout simple, même pas besoin de vous expliquer.

Source / Exemple : 


Option Explicit

Private Sub cmd€uro_Click()
Dim a
a = Text1.Text
Dim b
b = a * 6.55957
Text2.Text = b
End Sub

Private Sub cmdFrancs_Click()
Dim a
a = Text1.Text
Dim b
b = a / 6.55957
Text2.Text = b
End Sub

Private Sub cmdQuitter_Click()
End
End Sub

Conclusion :


Ecrivez-moi si il y a des bugs:
Newprogramer@voila.fr
Télécharger le projet

Codes Sources

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (Newprogramer)