begin process at 2008 07 06 18:42:51
1 205 717 membres
280 nouveaux aujourd'hui
14 119 membres club

Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum.
Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

MINIMUM ET MAXIMUM


Information sur la source

Catégorie :Maths Classé sous : minimum, min, max, maximum, calcul Niveau : Débutant Date de création : 04/09/2000 Vu : 5 152

Note :
6 / 10 - par 2 personnes
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (1)
Ajouter un commentaire et/ou une note

Description

Un petite fonction pour controle les entrés de valeur  

Source

  • Pour la valeur Maximun :
  • Dim Nombre_Entre As Integer 'As long, As byte etc... (numerique)
  • Dim Nombre_Sorti As Integer 'As long, As byte etc... (numerique)
  • Dim Nombre_Maximum As Integer 'As long, As byte etc... (numerique)
  • Nombre_Sorti = IIF(Nombre_Entre < Nombre_Maximum, Nombre_Entre, Nombre_maximum)
  • Pour minimum (une copy pas identique)
  • Nombre_Sorti = IIF(Nombre_Entre > Nombre_Minimum, Nombre_Entre, Nombre_Minimum)
  • Assemblage : (long mais très rapide)
  • Nombre_Sorti = IIF(Nombre_Entre < Nombre_Maximum, IIF(Nombre_Entre > Nombre_Minimum, Nombre_Entre, Nombre_Minimum), Nombre_maximum)
Pour la valeur Maximun :
Dim Nombre_Entre As Integer 'As long, As byte etc... (numerique)
Dim Nombre_Sorti As Integer 'As long, As byte etc... (numerique)
Dim Nombre_Maximum As Integer 'As long, As byte etc... (numerique)

Nombre_Sorti = IIF(Nombre_Entre < Nombre_Maximum, Nombre_Entre, Nombre_maximum)

Pour minimum (une copy pas identique)

Nombre_Sorti = IIF(Nombre_Entre > Nombre_Minimum, Nombre_Entre, Nombre_Minimum)

Assemblage : (long mais très rapide)

Nombre_Sorti = IIF(Nombre_Entre < Nombre_Maximum, IIF(Nombre_Entre > Nombre_Minimum, Nombre_Entre, Nombre_Minimum), Nombre_maximum) 
  • signaler à un administrateur
    Commentaire de vatoo le 14/01/2003 20:27:11

    Je rappelle qu'il est possible de faire simplement et sans test une fonction de maximum :

    max(a,b) = 1/2*(a+b+abs(a-b))

    min(a,b) = 1/2*(a+b-abs(a-b))

    vouala

Ajouter un commentaire

Pub



Appels d'offres

WEB DESIGN
Budget : 1 000€
Plugin Dialer outlook
Budget : 2 000€
Travail graphique- ill...
Budget : 1 000€

CalendriCode

Juillet 2008
LMMJVSD
 123456
78910111213
14151617181920
21222324252627
28293031   

Téléchargements

Logiciels à télécharger sur le même thème :

Boutique

Boutique de goodies CodeS-SourceS