Section courante

A propos

Section administrative du site

FUNCTION

 Fonction
Visual Basic

Syntaxe

Function nom[[(arguments)] As typeretour
...
End Function

Paramètres

Nom Description
nom Ce paramètre permet d'indiquer le nom de la fonction
arguments Ce paramètre permet d'indiquer les arguments de la fonction
typeretour Ce paramètre permet d'indiquer le type de retour de la fonction

Description

Cette instruction permet de définir une fonction.

Exemple

Voici un exemple permettant d'afficher le logarithme inférieurs à 2 en utilisant le mot réservé «FUNCTION» :

  1. Function Ln(X As Double) As Double
  2.  Ln = Log(X)
  3. End Function
  4.  
  5. Sub Main() 
  6.  Dim I As Double
  7.  Dim S As String
  8.  I = 0.1
  9.  While I <= 2.0
  10.   S = S & "LOG(" & I & ")=" & Ln(I) & vbCrLf
  11.   I = I + 0.1
  12.  Wend
  13.  MsgBox S
  14. End Sub

on obtiendra le résultat suivant :

LOG(0.100000)=-2.302585
LOG(0.200000)=-1.609438
LOG(0.300000)=-1.203973
LOG(0.400000)=-0.916291
LOG(0.500000)=-0.693147
LOG(0.600000)=-0.510826
LOG(0.700000)=-0.356675
LOG(0.800000)=-0.223143
LOG(0.900000)=-0.105360
LOG(1.000000)=0.000000
LOG(1.100000)=0.095310
LOG(1.200000)=0.182322
LOG(1.300000)=0.262364
LOG(1.400000)=0.336472
LOG(1.500000)=0.405465
LOG(1.600000)=0.470004
LOG(1.700000)=0.530628
LOG(1.800000)=0.587787
LOG(1.900000)=0.641854

Dernière mise à jour : Lundi, le 19 novembre 2012