begin process at 2012 02 10 22:24:09
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Maths

 > MINIMUM ET MAXIMUM

MINIMUM ET MAXIMUM


 Information sur la source

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

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

Auteur : TomAmplius

Ecrire un message privé
Commentaire sur cette source (2)
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) 



 Sources du même auteur

AJOUTER UN ZÉRO DEVANT UN CHIFFRE
HORREUR DES ERREUR DE DIVISION PAR 0
Source avec Zip INSTRUCTION DELAY SANS GETTICKCOUNT NI OBJECT TIMER
Source avec Zip SAVOIR SI UN NOMBRE EST PREMIER !!!
Source avec Zip METTRE DES SECONDES EN HEURES (4 LIGNES)

 Sources de la même categorie

Source avec Zip Source avec une capture CONVERTISSEUR HEXAVIGÉSIMAL par shaeks
Source avec Zip Source avec une capture Source .NET (Dotnet) CRYPTOGRAPHIE AFFINE par Tigrou66
Source avec Zip Source avec une capture SCANNER FLEX par lajouad
Source avec Zip EQUATIONSECONDDEGRÉ,MATH,DEGRÉ par shadkitenge
Source avec Zip Source .NET (Dotnet) SOMME DE CHIFFRES CONTENUE DANS UN NOMBRE par alpha5

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture CALCUL DE PLACEMENT OU DE PRET - MENSUALITES - MONTANT - D... par lexsty
Source avec Zip Source .NET (Dotnet) NOMBRES PRIMORDIAUX par alpha5
Source avec Zip Source avec une capture SUDOKU SOLVEUR CRIBLE par ccgousset
Source avec Zip Source avec une capture CURSEUR LINEAIRE % MAX / MIN par joelmarie
Source avec Zip Source avec une capture ALPHA BÉTA par TheTiger

Commentaires et avis

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

Commentaire de ninocris07 le 18/05/2009 16:33:12

ca sert a quoi un max ds le code ?...

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

calcul mathématique [ par breton53 ] un peu d'aide pour débutantJe dois concevoir un programme: pour calculer le max, le min et la moy des valeurs stockées dans un tableau 1D (temp()) lo Rechercher les valeurs min et max d'une table [ par Herminator ] Bonjour, je cherche &#224; afficher dans des textbox les valeurs mini et maxi d'une table access qui comprent en moyenne une dizaine d'enregistrements [VB6] Problème de création de table dans une bdd access [ par lefoimpeur ] Bonjour, J'ai un probl&#232;me assez emb&#234;tant. Lorsque je cr&#233;e une table dans ma bdd access &#224; partir du code VB j'ai une erreur alors tout petit probleme tt con!! [ par kyp ] salut a tous..je vous explike mon probleme...sur le logiciel ke je developpe en ce moment je dois calculer des valeurs min et max pour des surfaces se comment trouver la valeur MIN et la valeur MAX dans un tableau [ par Jeronimo ] J'ai un tableau intNombre(1 to 25). Premièrement, les valeurs du tableau sont initiées par un combobox. Ensuite, je dois afficher la valeur la plus é Besoin aide sur fonction Min et Max dans Macro Excel [ par Baboune ] Bonjour,je voudrai utiliser la fonction Min et Max suivante de TomAmplius mais je n'y comprend rien !Je voudrai aussi l'associer avec la fonction de c comprends pas pkoi ça marche pas [ par william the new ] je fé un puissance 4, g un problème ds ma procédure de vérificationcela marche très bien qd je fé les diagonales qui parte de bas en hautmais je ne co Variables nulles qui ne devraient pas l'être : d'où vient l'erreur ? [ par Lisla ] Bonjour,Je mets mon message dans la catégorie débutants, parce qu'on ne peut pas tellement dire que je maitrise le VB...Bon, voilà, on a eu deux pauvr Min...Max...d'un comboboxe... [ par Gigi ] Bonjour! voici mon probleme... j'ai des nombres dans un comboboxes, et je veux afficher dans des labels respectifs, la valeur minimal et la va Trouver le max et le min dans un tableau [ par Jeronimo ] Je dois, dans la même procédure trouver le nombre max et le nombre min dans un tableau. Comment faire ?Mon tableau est intNombre(25) as Integermerci


Nos sponsors


Sondage...

Comparez les prix

CalendriCode

Février 2012
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
272829    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,950 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales