ASX PHYSIQUE

econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 - 8 oct. 2007 à 21:47
dx3 Messages postés 2 Date d'inscription vendredi 23 décembre 2005 Statut Membre Dernière intervention 27 février 2008 - 28 oct. 2007 à 00:06
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/44326-asx-physique

dx3 Messages postés 2 Date d'inscription vendredi 23 décembre 2005 Statut Membre Dernière intervention 27 février 2008
28 oct. 2007 à 00:06
Je sais et je suis en train de faire une nouvelle version
PCPT Messages postés 13272 Date d'inscription lundi 13 décembre 2004 Statut Membre Dernière intervention 3 février 2018 47
17 oct. 2007 à 00:45
description un peu maigre :s
c'est pas vendeur!
tu peux mettre à jour stp? au moins de donner envie de télécharger, ou tout au moins savoir pourquoi regarder ou non

++
MadM@tt Messages postés 2167 Date d'inscription mardi 11 novembre 2003 Statut Membre Dernière intervention 16 juillet 2009 1
9 oct. 2007 à 00:37
La présentation du code sert à présenter ce que le code fait ...
Explique un minimum au moins
econs Messages postés 4030 Date d'inscription mardi 13 mai 2003 Statut Membre Dernière intervention 23 décembre 2008 24
8 oct. 2007 à 21:47
Salut,

En utilisant "On Error Resume Next", tu ne verras jamais les fautes dans ton code. C'est certes très pratique, mais c'est dommage.
Par exemple, je vois dans le code un certain nombre de divisions qui pourraient être des divisions par 0 si je rentrais "0" dans la textbox adéquate :
If txt_joul.Text "" Or txt_secondes.Text "" Or txt_joul.Text = "Joules" Or txt_secondes.Text = "Secondes" Then
text3.Text = text3.Text & vbNewLine & "Veuillez saisir les joules et les secondes"
Else text3.Text text3.Text & vbNewLine & "P " & Val(txt_joul.Text) / Val(txt_secondes.Text) ' <============ ICI

End If
Rejoignez-nous