Opciones y directivas del compilador

Al inicio de un módulo podemos fijar las siguientes opciones o directivas a nivel del compilador de OpenOffice Basic:

Option Compatible

Al incorporar esta opción del compilador al principio de un módulo, le indicas al compilador que modifique su modo de trabajo para ser más compatible con el dialecto VBA.

Puedes encontrar información de esta opción del compilador en este enlace de nuestro blog: Option Compatible en OOo Basic

Option Explicit

La declaración de variables no es obligatoria, pero es muy conveniente para evitar errores.

Para forzar a que se nos exija que se declaren las variables utilizadas, debemos agregar el comando de compilador  Option Explicit  al inicio de cada módulo.

REM  *****  BASIC  *****
Option Explicit
 
Sub MiFuncion() as string
 
 
End Sub

Si utilizamos una variable no declarada previamente, al iniciar la macro el compilador se detendrá mostrando un mensaje de error y resaltada en azul, la variable no declarada.

Directiva Def

Podemos declarar por la letra con la que empieza el nombre de la variable los tipos de aquellas variables cuyo tipo no sea declarado explícitamente.

Para forzar esta declaración, debemos agregar uno o más comandos de compilador  Def  al inicio de cada módulo.

En el siguiente ejemplo se definirán como variables de tipo:

• integer aquellas que empiecen por las letras i, j, k o n, utilizando DefInt
• long las que empiecen por la letra l, utilizando DefLng
• double las que empiecen por la letra d, utilizando DefDbl
• single las que empiecen por la letra s, utilizando DefSng
• currency las que empiecen por la letra m, utilizando DefCur

• string las que empiecen por la letra c, utilizando DefStr

• boolean las que empiecen por la letra b, utilizando DefBool
• date las que empiecen por la letra f o h, utilizando DefDate

• objeto las que empiecen por la letra o, utilizando DefObj
• variable las que empiecen por la letra v, utilizando DefVar

REM  *****  BASIC  *****
Option Explicit
DefInt i-k, n
DefLng l
DefDbl d
DefSng s
DefCur m
 
DefStr c
 
DefBool b
DefDate f,h
 
DefObj o
DefVar v
 
Sub MiSubRutina() as string
 
 
End Sub

La directiva  Def  declara el tipo de la variable, pero no declara la variable, que tiene que ser declarada al nivel que corresponda.

Las variables tampoco se inicializan con su tipo de dato, por lo que antes de asignarles un valor, se presentan como vacías.

El siguiente código utiliza las funciones  TypeName  y  VarType  para ilustrar este hecho.

REM  *****  BASIC  *****
Option Explicit
DefInt i-k
DefLng n
DefDbl d
 
DefBool l
DefDate f,h
DefObj o
DefVar v
 
DefCur m
DefSng s
DefStr c
 
Dim cTexto
 
Sub MiSubRutina( optional nNumero )
Dim fFecha
 
MsgBox TypeName( cTexto ) & chr(13) & _
       TypeName( nNumero ) & chr(13) & _
       TypeName( fFecha ) 
 
MsgBox VarType( cTexto ) & chr(13) & _
       VarType( nNumero ) & chr(13) & _
       VarType( fFecha )  
 
cTexto = "Hola"
nNumero = 100
fFecha = date
 
MsgBox TypeName( cTexto ) & chr(13) & _
       TypeName( nNumero ) & chr(13) & _
       TypeName( fFecha ) 
 
MsgBox VarType( cTexto ) & chr(13) & _
       VarType( nNumero ) & chr(13) & _
       VarType( fFecha )               
 
End Sub