Sintaxis:

Oct(numero)

Devuelve una cadena que representa el valor octal de un número. El argumento 'numero' es cualquier expresión válida. Si 'numero' no es ya un número entero, se redondea al número entero más cercano antes de evaluarse.
Si 'numero' es Null Oct devuelve Null
Si 'numero' es vacío Oct devuelve 0
Si 'numero' es cualquier otro número Oct devuelve hasta 11 caracteres octales,

Puede representar números octales directamente si precede los números del intervalo apropiado con &O. Por ejemplo, &O10 es la notación octal para el valor decimal 8.

El siguiente ejemplo utiliza la función Oct para devolver el valor octal de un número:

Dim MiOct
MiOct = Oct(4)   ' Devuelve 4.
MiOct = Oct(8)   ' Devuelve 10.
MiOct = Oct(459)  ' Devuelve 713.