Division par zéro ?? - VB/VBA/VBS - Programmation
Marsh Posté le 26-12-2005 à 11:26:13
bonjour, 
val(TxtSurface) est egal à 0 et tu ne peux diviser par 0 
A+
Marsh Posté le 26-12-2005 à 11:50:36
Salut Galopin 
ma valeur n'est pas à zéro, sinon je n'aurais pas posté. 
Il faut remplacer val(Txtsurface) pac Csng(Txt...) 
Merci quand même 
Problème résolu par contre j'ai la valeur avec 20 chiffres derriere la virgule, peut tu me dire comment avoir seulement 3 chiffres ?? merci @+
Marsh Posté le 26-12-2005 à 21:33:26
Bonjour,  
 
La commande Round (x, 3) devrait convenir. 
 
Est -ce que ça marche ? 
 
 
Marsh Posté le 27-12-2005 à 07:37:20
Salut PGreg 
Merci pour ta réponse, en fait j'ai fait: 
.Txtbox1.value = Format(CSng(Txtbox2) / CSng(Txtbox3) / 3600, "0.000" ) 
et çà marche. 
Merci quand même 
@+ 
Marsh Posté le 31-01-2006 à 18:12:02
J'ai ceci dans mon code 
 
Mais je veut qu'il ne fasse pas une erreur division par zéro 
 
dblHeure = Round(rsMiseAJour("Decision" ) * rsMiseAJour("Choix" ) / dblTauxHoraire, 2) 
 
Si vous pouvez m'aider ! 
Merci 
Chiffre
Marsh Posté le 10-11-2007 à 10:14:21
il faut utiliser un try catch pour gerer les exception 
sans le try catch t'as pas le droit d'utiliser une instruxion 
qui comporte une erreur meme si les condition le permettent 
 
l'infini+1=l'infini<=>a+1=a<=>1=0a<=>1/0=a 
1/l'infini=0<=>1/a=0<=>1=0a<=>1/0=a 
2xl'infini=l'infini<=>2a=a<=>2=a^0<=>2^(1/0)=a 
0xX=7<=>X=7/0 
X/0=9<=>X=0(x9)  (x9)=charge anti absorbance 
qui rend n'importe quel matrice inversible 
il faut l'homothetie de depart 
1 0 0 
0 2 0 
0 0 (0) 
 
en interpolation lineere 
quand tu as un point tu as une seule division par zero donc impossible 
quand tu as plusieur point tu as plujsieur division par zero 
les division entre elle redevienne un reel 
 
regarde un coup e reve de phebus et dpz sur le net
Marsh Posté le 11-11-2007 à 03:16:41
il faut impérativement que ton val(TxtSurface) soit un double.
Marsh Posté le 11-11-2007 à 03:24:00
 
if dblTauxHoraire<>0 then_ 
dblHeure = Round(rsMiseAJour("Decision" ) * rsMiseAJour("Choix" ) / dblTauxHoraire, 2) 
Marsh Posté le 22-06-2008 à 13:52:43
0phi=1 a un sens imaginaire comme i 
si on multipli par zero aprés l'apparition de la division par zero 
et pas avant le calcul redevient normal 
 
j'explique 1=2 
n'est pas la resultante de la division par zero 
mais de la multiplication par zero 
 
a=b 
(a+b)(a-b)=a2-b2+ab-ab  
l'erreur ne provient pa de la dpz mais la soustraction aboutissant à 0 
comme une multiplication par zero  
((((( (a+b)(a-b)=a(a-b)+(a(b-b)=non simplification) )))))/(a-b) 
(a+b)(a-b)/(a-b)=a(a-b)/(a-b)+a(a-b)/(a-b) 
(a+b)0/0=a0/0+a0/0 
pour simplifier 
on utilise 0phi=1 
phi=1/0 
 
(a+b)0(phi=1/0)=a0phi+a0phi 
(a+b)x1=ax1+ax1 
a+(b=a)=a+a 
a+a=a+a 
2a=2a 
a=a 
 
http://phebus.journalintime.com/forum/2006-05-02-zero 
 
Marsh Posté le 26-06-2008 à 16:15:28
b=1=a 
implique division par zero 
 
prenon un cas ou il n'y a pas de division par zero 
mai feson expres de divisé par zero 
b=2 
a=5 
(b+a)(b-a)=b2-a2+ab-ab 
(2+5)(2-5)=4-25+ou-0x10 
((7)x(-3+ou-0x2)=-21+ou-14x0)=+ou-4x0-21+ou-10x0 
(-21+ou-14x0)/0=(-21+ou-4x0+ou-10x0)/0 
-21/0+ou-14x0/0=-21/0+ou-14ou6x0/0 
donc on a une indetermination sur le signe 
-21/0+ou-14=-21/0+ou-14    et pas 6 
notre egalité est vrai 
 
prenon notre cher axiom(1)  
0a=0 
prenon l'axiom (2) 
1not=2 
 
prenon l'axiom (1) 
vrai=(0x1=0)=(0/0=1)=vrai 
reprenon l'axiom (1) 
vrai=(0x2=0)=(0/0=2)=vrai 
0/0=1=0/0=2 
 
l'un des deux axiom est faux 
car l'axiom 1 dit 1=2=0/0 
et l'axiom 2 dit 1=not2 
1=2=0/0 <=> 0a=0 definit notre division par zero comme impossible 
et cré un algebre ou il existe des cas indeterminé 
la division par zero ne fera pas la difference entre un ou deux ou troi 
puisque nous la definisson ainsi 
 
0a=1 a=1/0 definit la division par zero comme possible 
elle a sa propre regle de multiplication par zero 
0a=0a a ne pas simplifié 
 et cré un algebre ou il existe plu de cas indeterminé sur la quantité 
mais uniquement une indetermination sur le signe puisque 
qu'il est impossible de dire que le zero est positif ou negatif 
la division par zero ne sera pas capable de distingué un plus d'un moin 
il y a toujour une erreur mais elle reste sur le signe 
 
 
nous avon deux algebre que le meilleur gagne 
je pari sur mon nouvel algebre 
Marsh Posté le 01-07-2008 à 12:19:34
oui 
 
je veux devenir aussi president de la terre rien que ca  
 
je suis en train de construire des superlogiciel 
 
ixi=(demi-)1x(demi-)1=(deux demi -)1 
fendu x fendu = (demi+)1x(demi+)1=(deux demi +)1 
i^2=-1 n'infrein pas le regle 
du +x+=+ 
-x-=+ 
-x+=- 
car se sont des demi signe 
je soupson l'existence quart de - 
et quart de + 
aussi de 39/17ieme de - 
aussi de 39/17ieme de + 
 
je soupsone le signe entre 
la multiplication d'un fendu et d'un i 
demi - x demi + = 0demi + ou - 
 
en fait une dimension 
à une dimension bool droite ou angle 
une sous dimension norm 
une sous dimension sens 
une sous dimension direction pour droite et nesesit entre deux dimension 
pour la rotation 
 
j'imagine demi- de demi - de demi 
donc laq sous dimension sens 
avec sa propre sous dimension sens 
 
0phi=1 conresponde à quelque chose de concret je sais pas encore 
pareil pour e^x=-1 
Marsh Posté le 01-07-2008 à 12:28:14
'k lol 
avant d'apprendre à diviser par zéro, file donc apprendre l'orthographe, je viens de perdre 40° de mon champ de vision là
Marsh Posté le 26-12-2005 à 10:55:57
Bonjour à tous,
  
  
  
  
  
 
voila mon problème : je fais un calcul mais qui ne fonctionne pas, l'erreur est : division par zéro ????
Private Sub TxtDébitDésiré_Change()
With FeuilledesaisieCTA
.TxtVitesseDésirée.value = Val(TxtDébitDésiré) / Val(TxtSurface) / 3600 / 1000000
End With
End Sub
sachant que val(TxtSurface) peut etre avec décimale
OU est l'erreur ????
Merci pour votre aide