CLNG |
Conversion en long |
|---|---|
| Visual Basic | |
Syntaxe
| Function CLNG(expression) As Long |
Paramètres
| Nom | Description |
|---|---|
| expression | Ce paramètre permet d'indiquer l'expression scalaire à traiter. Le paramètre expression est n'importe quelle expression valide. |
Description
Cette fonction permet de convertir une expression en un type entier long.
Remarques
- En général, vous pouvez documenter votre code à l'aide des fonctions de conversion de sous-type pour montrer que le résultat d'une opération doit être exprimé sous la forme d'un type de données particulier plutôt que du type de données par défaut. Par exemple, utilisez CInt ou CLng pour forcer l'arithmétique d'entiers dans les cas où l'arithmétique monétaire, de simple précision ou de double précision se produirait normalement.
- Utilisez la fonction CLng pour fournir des conversions internationales à partir de tout autre type de données vers un sous-type Long. Par exemple, différents séparateurs décimaux sont correctement reconnus en fonction des paramètres régionaux de votre système, tout comme les milliers de séparateurs.
- Si l'expression se trouve en dehors de la plage acceptable pour le sous-type Long, une erreur se produit.
- L'exemple suivant utilise la fonction CLng pour convertir une valeur en Long :
- La fonction CLng diffère des fonctions Fix et Int, tronquant, plutôt que d'arrondissant, la partie fractionnaire d'un nombre. Lorsque la partie fractionnaire est exactement 0,5, la fonction CLng l'arrondit toujours au nombre pair le plus proche. Par exemple, 0,5 arrondi à 0 et 1,5 arrondi à 2.
Dim MyVal1, MyVal2, MyLong1, MyLong2
MyVal1 = 25427.45: MyVal2 = 25427.55 ' MyVal1, MyVal2 sont des doubles.
MyLong1 = CLng(MyVal1) ' MyLong1 contient 25427.
MyLong2 = CLng(MyVal2) ' MyLong2 contient 25428.
Exemple
Voici un exemple montrant la conversion de valeur entière long :
- Sub Main()
- MsgBox "CLNG(1)=" & CLNG(1) & vbCrLf & _
- "CLNG(1.1)=" & CLNG(1.1) & vbCrLf & _
- "CLNG(1.7)=" & CLNG(1.7) & vbCrLf & _
- "CLNG(-1)=" & CLNG(-1) & vbCrLf & _
- "CLNG(-1.1)=" & CLNG(-1.1) & vbCrLf & _
- "CLNG(-1.7)=" & CLNG(-1.7) & vbCrLf & _
- "CLNG(30.2)=" & CLNG(30.2) & vbCrLf & _
- "CLNG(-35.4)=" & CLNG(-35.4) & vbCrLf & _
- "CLNG(200000)=" & CLNG(200000) & vbCrLf & _
- "CLNG(-65536)=" & CLNG(-65536)
- End Sub
on obtiendra le résultat suivant :
CLNG(1)=1CLNG(1.1)=1
CLNG(1.7)=2
CLNG(-1)=-1
CLNG(-1.1)=-1
CLNG(-1.7)=-2
CLNG(30.2)=30
CLNG(-35.4)=-35
CLNG(200000)=200000
CLNG(-65536)=-65536
Dernière mise à jour : Lundi, le 19 novembre 2012