Contenu

# 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) ' Renvoie 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 ' Erreur
                End Sub

## MsgBox Named Constants

Constante nommée | Valeur entière | Définition
--- | --- | ---
MB_OK | 0 | Afficher uniquement le bouton OK.
MB_OKCANCEL | 1 | Afficher les boutons OK et Annuler.
MB_ABORTRETRYIGNORE | 2 | Afficher les boutons Abandonner, Réessayer et Ignorer.
MB_YESNOCANCEL | 3 | Afficher les boutons Oui, Non et Annuler.
MB_YESNO | 4 | Afficher les boutons Oui et Non.
MB_RETRYCANCEL | 5 | Afficher les boutons Réessayer et Annuler.
MB_ICONSTOP | 16 | Ajouter l'icône Message critique à la boîte de dialogue.
MB_ICONQUESTION | 32 | Ajouter l'icône Requête d'avertissement à la boîte de dialogue.
MB_ICONEXCLAMATION | 48 | Ajouter l'icône Message d'avertissement à la boîte de dialogue.
MB_ICONINFORMATION | 64 | Ajouter l'icône Message d'information à la boîte de dialogue.
| 128 | Désigner le premier bouton de la boîte de dialogue comme bouton par défaut.
MB_DEFBUTTON2 | 256 | Désigner le deuxième bouton de la boîte de dialogue comme bouton par défaut.
MB_DEFBUTTON3 | 512 | Désigner le troisième bouton de la boîte de dialogue comme bouton par défaut.

## GetAttr Named Constants

Constante nommée | Valeur | Définition
--- | --- | ---
ATTR_NORMAL | 0 | Fichiers normaux.
ATTR_READONLY | 1 | Fichiers en lecture seule.
ATTR_HIDDEN | 2 | Fichier caché
ATTR_SYSTEM | 4 | Fichier système
ATTR_VOLUME | 8 | Renvoie le nom du volume
ATTR_DIRECTORY | 16 | Renvoie le nom du répertoire uniquement.
ATTR_ARCHIVE | 32 | Fichier modifié depuis la dernière sauvegarde (attribut d'archivage).

## Type de données Named Constants

valeurs TypeName | Constante Named | VarType values | Type de variable
--- | --- | --- | ---
…() | 8192 | Matrice de variables
Boolean | 11 | variable Boolean
Byte | 17 | variable Byte
Date | V_DATE | 7 | variable Date
Currency | V_CURRENCY | 6 | variable Currency
Double | V_DOUBLE | 5 | Variable à virgule flottante double précision
Error | 11 | variable Error type
Integer | V_INTEGER | 2 | variable Integer
Long | V_LONG | 3 | variable entière Long
Object | 9 | variable Object
Single | V_SINGLE | 4 | Variable à virgule flottante simple précision
String | V_STRING | 8 | variable String
Variant | 12 | variable Variant (peut contenir tous les types spécifiés par la définition)
Empty | V_EMPTY | 0 | variable Variant non initialisée
Null | V_NULL | 1 | Absence de données valides

## Constantes supplémentaires VBA

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

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

### Constantes nommées VBA MsgBox

Nom | Valeur
--- | ---
vbApplicationModal | 0
vbDefaultButton1 | 0
vbOKOnly | 0
vbOKCancel | 1
vbAbortRetryIgnore | 2
vbYesNoCancel | 3
vbYesNo | 4
vbRetryCancel | 5
vbCritical | 16
vbQuestion | 32
vbExclamation | 48
vbInformation | 64
vbDefaultButton2 | 256
vbDefaultButton3 | 512
vbDefaultButton4 | 768
vbSystemModal | 4096
vbMsgBoxHelpButton | 16384
vbMsgBoxSetForeground | 65536
vbMsgBoxRight | 524288
vbMsgBoxRtlReading | 1048576

### Couleur VBA Named Constants

Constante nommée | Rouge, Vert, Bleu composition
--- | ---
vbBlack | RGB(0, 0, 0)
vbBlue | RGB(0, 0, 255)
vbCyan | RGB(0, 255, 255)
vbGreen | RGB(0, 255, 0)
vbMagenta | RGB(255, 0, 255)
vbRed | RGB(255, 0, 0)
vbYellow | RGB(255, 255, 0)
vbWhite | RGB(255, 255, 255)

### Type de variable Named Constants

Constante nommée | Valeur décimale
--- | ---
vbArray | 8192
vbBoolean | 11
vbByte | 17
vbCurrency | 6
vbDataObject | 13
vbDate | 7
vbDecimal | 14
vbDouble | 5
vbEmpty | 0
vbError | 10
vbInteger | 2
vbLong | 3
vbNull | 1
vbObject | 9
vbSingle | 4
vbString | 8
vbUserDefinedType | 36
vbVariant | 12

### FormatDateTime VBA Named Constants

Constante nommée | Valeur | Description
--- | --- | ---
vbGeneralDate | 0 | Affiche une date et/ou une heure tel que défini dans les paramètres de date généraux du système. S'il s'agit uniquement d'une date, l'heure n'est pas affichée ; s'il s'agit uniquement d'une heure, la date n'est pas affichée.
vbLongDate | 1 | Affiche une date utilisant le format de date long spécifié dans les paramètres régionaux de l'ordinateur.
vbShortDate | 2 | Affiche une date utilisant le format de date court spécifié dans les paramètres régionaux de l'ordinateur.
vbLongTime | 3 | Affiche une heure telle que définie dans les paramètres de temps long du système.
vbShortTime | 4 | Affiche une heure utilisant le format 24 heures (hh:mm).

### StrConv VBA Named Constants

Conversion | Valeur | Description
--- | --- | ---
vbUpperCase | 1 | Convertit les caractères de Text en majuscules.
vbLowerCase | 2 | Convertit les caractères de Text en minuscules.
vbProperCase | 3 | Convertit la première lettre de chaque mot dans Text en majuscules.
vbWide | 4 | Convertit les caractères étroits (demi-chasse) dans le Text en caractères larges (pleine chasse).
vbNarrow | 8 | Convertit les caractères larges (pleine chasse) dans Text en caractères étroits (demi-chasse).
vbKatakana | 16 | Convertit les caractères Hiragana dans Text en caractères Katakana.
vbHiragana | 32 | Convertit les caractères Katakana dans Text en caractères Hirarana.
vbUnicode | 64 | Convertit les caractères de Text en caractères Unicode en utilisant la page de code par défaut du système.
vbFromUnicode | 128 | Convertit les caractères de Text de Unicode à la page de code par défaut du système.

### WeekDayName VBA Named Constants

Valeur | Constante VBA | Description
--- | --- | ---
0 | vbUseSystemDayOfWeek | Utiliser les paramètres locaux du système
1 | vbSunday | Dimanche (par défaut)
2 | vbMonday | Lundi
3 | vbTuesday | Mardi
4 | vbWednesday | Mercredi
5 | vbThursday | Jeudi
6 | vbFriday | Vendredi
7 | vbSaturday | Samedi

### Miscellaneous VBA Named Constants

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 !