C'est une petite calculatrice je suis débutant alors ne riez pas!!!!

Soyez le premier à donner votre avis sur cette source.

Vue 2 566 fois - Téléchargée 364 fois

Description

c'est juste une mini-calculatrice ( c'est super utile n'est-ce pas!!! )

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
32
Date d'inscription
mercredi 17 mars 2004
Statut
Membre
Dernière intervention
24 novembre 2004

Oups dsl j'avais pas vu que tu avais déjà résolu le problème !
Messages postés
32
Date d'inscription
mercredi 17 mars 2004
Statut
Membre
Dernière intervention
24 novembre 2004

Salut, moi aussi je débute !

pour ce qui est du point on peut utiliser très simplement la fonction Replace.

Pour ton cas tu fais :
txt1 = Replace(txt1, ".", ",")
et pareil pour ton Txt2

Voila c'est règlé !
Messages postés
16
Date d'inscription
mardi 10 février 2004
Statut
Membre
Dernière intervention
22 janvier 2006

bon merci pour tout vos message sympa et sinon comment on fait pour gerer les points
merci encore
@+
tomitom07
Messages postés
222
Date d'inscription
jeudi 15 janvier 2004
Statut
Membre
Dernière intervention
30 juin 2008

oups. j'ai honte :

Private Sub cmdadd_Click()
if isnumeric(txt1)=false or isnumeric(txt2)=false then 'Vérifie
Txtresult = "remplissez bien toutes les cases" 'ERREUR
else
Txtresult = val(txt1) + val(txt2)'ADITIONNE
end if
end sub

Meme pas UNE VARIABLE
Messages postés
222
Date d'inscription
jeudi 15 janvier 2004
Statut
Membre
Dernière intervention
30 juin 2008

Numéro 1- Utilise pas double car c'est un type de variable très lourd.
Numéro 2- Pour déclarer des variables, tu peux faire ça :

Dim txt0 As Double, txt3 As Double, txtresulta As Double

c bien mieux

Numéro 3- Je ferai ça pour le ADD

Private Sub cmdadd_Click()
dim Txtresult as string 'Le résultat final
if isnumeric(txt1)=false or isnumeric(txt2)=false then 'Vérifie
Txtresult = "remplissez bien toutes les cases" 'ERREUR
else
Txtresult = val(txt1) + val(txt2)'ADITIONNE
end if
end sub

Numéro 4- C'est à peu près la même chose pour toute les autres fonction : TROP DE VARIABLES ET PAS OPTIMISÉ

Mais je trouve que c'est pas pire pour un débutant
Afficher les 10 commentaires

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.