Constantes Basic

Constantes utilisées dans les programmes Basic

Constantes booléennes

Nom

Type

Valeur

True

Boolean

1

False

Boolean

0


Exemple :


            Dim bPositive as Boolean
            bPositive = True
        

Constante mathématique

Nom

Type

Valeur

Pi

Double

3.14159265358979


Exemple :


            Function Rad2Deg( aRad as Double) As Double
             Rad2Deg = aRad * 180.00 / Pi
            End Function
        

Constantes objet

Nom

Type

Utilisation

Empty

Variant

La valeur Empty indique que la variable n'est pas initialisée.

Null

null

Indique que la variable ne contient aucune donnée.

Nothing

Object

Assigne l'objet Nothing à une variable pour supprimer une assignation antérieure.


Exemple :


            SubExampleEmpty
            Dim sVar As Variant
             sVar = Empty
             Print IsEmpty(sVar) ' Returns True
            End Sub
            Sub ExampleNull
            Dim vVar As Variant
             MsgBox IsNull(vVar)
            End Sub
            Sub ExampleNothing
            Dim oDoc As Object
             Set oDoc = ThisComponent
             Print oDoc.Title
             oDoc = Nothing
             Print oDoc ‘ Error
            End Sub
        

Constantes supplémentaires VBA

Les constantes suivantes sont disponibles lorsque le mode de compatibilité est activé

warning

Cette constante, fonction ou objet est activé avec l'instruction Option VBASupport 1 placée avant le code exécutable dans un module.


Constante nommée

Valeur hexadécimale (décimale)

Description

vbTrue

-1

Partie de l'énumération vbTriState

vbFalse

0

Partie de l'énumération vbTriState

vbUseDefault

-2

Partie de l'énumération vbTriState

vbCr

\x0D (13)

CR - Retour Ă  la ligne

vbCrLf

\x0D\x0A (13 10)

CRLF - Retour Ă  la ligne et saut de ligne

vbFormFeed

\x0c (12)

FF - Saut de page

vbLf

\x0A (10)

LF - Saut de ligne

vbNewLine

\x0D\x0A (13 10) pour Windows

\x0A (10) pour les autres systĂšmes

LF ou CRLF

vbNullString

""

ChaĂźne vide

vbTab

\x09 (9)

HT - Tabulation horizontale

vbVerticalTab

\x0B (11)

VT - Tabulation verticale


Aidez-nous !