MINIMUM ET 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) 

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

• EQUATION DU SECOND DEGRÉ RÉSOLUE AVEC DEUX METHODES
• PROJECTION SOLEIL
• INTERRUPTEUR ALÉATOIRE
• PROBABILITES
• PIVOT DE GAUSS

• CALCUL DE RÉSISTANCES
• BUDGET MENSUEL
• DLL POUR EXECUTER LES FONCTIONS ET PROCEDURES EXTERNES A TON APPLI MEME DEJA COMPILE
• CURSEUR LINEAIRE % MAX / MIN
• ALPHA BÉTA