Constantes de Basic

Constantes utilizadas en programas escritos en Basic

Constantes booleanas

Nombre

Tipo

Valor

True

Boolean

1

False

Boolean

0


Ejemplo:


            Dim bPositive as Boolean
            bPositive = True
        

Constante matemática

Nombre

Tipo

Valor

Pi

Double

3.14159265358979


Ejemplo:


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

Constantes de objetos

Nombre

Tipo

Utilización

Empty

Variant

El valor Vacío indica que no se ha inicializado la variable.

Null

null

Indica que la variable no contiene datos.

Nothing

Object

Asigne el objeto Nothing a una variable para quitar una asignación anterior.


Ejemplo:


            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 adicionales de VBA

Las constantes siguientes están disponibles cuando se activa el modo de compatibilidad con VBA

warning

Esta función o constante se activa con la instrucción Option VBASupport 1, la cual se coloca antes del código ejecutable del programa en un módulo.


Constante con nombre

Valor hexadecimal (decimal)

Descripción

vbTrue

-1

Parte de la enumeración vbTriState.

vbFalse

0

Parte de la enumeración vbTriState.

vbUseDefault

-2

Parte de la enumeración vbTriState.

vbCr

\x0D (13)

CR: retorno de carro

vbCrLf

\x0D\x0A (13 10)

CRLF: retorno de carro y salto de renglón

vbFormFeed

\x0c (12)

FF: salto de página

vbLf

\x0A (10)

LF: salto de renglón

vbNewLine

\x0D\x0A (13 10) para Windows de 32 bits

\x0A (10) para otros sistemas de 64 bits

LF o CRLF

vbNullString

""

Cadena nula

vbTab

\x09 (9)

HT: tabulación horizontal

vbVerticalTab

\x0B (11)

VT: tabulación vertical


¡Necesitamos su ayuda!