Convertisseur

Soyez le premier à donner votre avis sur cette source.

Vue 2 371 fois - Téléchargée 306 fois

Description

Voila un convertisseur au style de XP !!!!

Un grand merci à Black Wizzard pour sa source qui est super pour un débutant comme moi !!!

Le bug est corrigé !!!
Merci shivan !!!

Source / Exemple :


'tout est dans le zip

Codes Sources

A voir également

Ajouter un commentaire Commentaires
TAOTCrash
Messages postés
2
Date d'inscription
vendredi 14 juin 2002
Statut
Membre
Dernière intervention
23 juin 2002

23 juin 2002 à 14:25
Non il faut mettre :
Exit sub
cs_shivan
Messages postés
363
Date d'inscription
jeudi 20 décembre 2001
Statut
Membre
Dernière intervention
25 août 2003

13 avril 2002 à 23:28
il te manque pas quelque chose la dedant ?

Private Sub Francs_Click()
On Error GoTo e
a = Text1.Text
b = a * 6.55957
Label1.Caption = b
'????? ----> si la conversion est bonne, fo kiter la fonction !!! mettre End Sub !
e: MsgBox ("Veuillez inscrire une somme et rien d'autre !!!"), vbExclamation, "Erreur"
Text1.Text = ""
End Sub

A+

$hîv@n

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.