Costanti di Basic

Constanti usate nei programmi Basic

Costanti logiche (booleane)

Nome	Tipo	Valore
True	Boolean	1
False	Boolean	0

Esempio:


            Dim bPositive as Boolean
            bPositive = True

Costanti matematiche

Nome	Tipo	Valore
Pi	Double	3.14159265358979

Esempio:


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

Costanti di oggetti

Nome	Tipo	Uso
Empty	Variant	Il valore Empty indica che la variabile non è inizializzata.
Null	null	Indica che la variabile non contiene dati.
Nothing	Object	Assegna l'oggetto Nothing a una variabile per rimuovere l'assegnazione precedente.

Esempio:


            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

Costanti VBA aggiuntive

Quando è attivato il modo compatibilità VBA sono disponibili le seguenti costanti

Questa funzione o costante viene abilitata con l'istruzione Option VBASupport 1 posizionata prima del codice eseguibile del programma all'interno del modulo.

Costante con nome	Valore (decimale) esadecimale	Descrizione
vbTrue	-1	Parte della enumerazione vbTriState.
vbFalse	0	Parte della enumerazione vbTriState.
vbUseDefault	-2	Parte della enumerazione vbTriState.
vbCr	\x0D (13)	CR - Carriage return (ritorno a capo)
vbCrLf	\x0D\x0A (13 10)	CRLF - Carriage return and line feed (ritorno a capo e nuova riga)
vbFormFeed	\x0c (12)	FF - Form feed (salto di pagina)
vbLf	\x0A (10)	LF - Line feed (nuova riga)
vbNewLine	\x0D\x0A (13 10) per Windows a 32 bit \x0A (10) per altri sistemi a 64 bit	LF o CRLF
vbNullString	""	Stringa Null
vbTab	\x09 (9)	HT - Tabulazione orizzontale
vbVerticalTab	\x0B (11)	VT - Tabulazione verticale