Soyez le premier à donner votre avis sur cette source.
Snippet vu 5 846 fois - Téléchargée 69 fois
La fonction suivante permet de dené une fonction égale à Y=0 sauf pour la valeur 0 ou Y(0) = 1 Y1 = Int(1/(X^2+1)) 'Y1(0)=1 et Y1(R*) = 0 On peut remplacer X par (X-2)^2 Y2 = Int(1/((X-2)^2+1)) ' Y2(2) = 1 et Y2(R-{2}) =0 Donc on peut mettre un polynome factorisé : Y3 = Int(1/(((X-2)(X+2)(x-100))^2+1)) ' Y3(2) = Y3(-2) = Y3(100) = 1 Ce qui nous amméne à : Function Un_Nom (byref Denominateur as Decimal) as Decimal Un_Nom = Denominateur + 1/(int((Denominateur^2+1)) End Function Dans vos sources vous utliser : Avec Y et Z une fonction et X le resultat X = Y/No_0(Z) Donc si Z a pour valeur 0, à la place de l'erreur, X = Y Mais la fonction IIF est aussi rapide pour le cas d'une valeur (Cas de la fonction ci-dessus ET Y1 et Y2) Il est preferable de les utiliser en visual basic 5 Fonction ci-dessus : X = Y/IIF( Z = 0, 1,Z) Y1 : IIF( X = 0, 1,0) Y2 : IIF( X = 2, 1,0) y3 : IIF( X = 2 and X = -2 and X = 100, 1,0)
Commentaire
pourquoi ajoutes tu 0 ?
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.