Declare Function Oct( ByVal number As Byte ) As String
Declare Function Oct( ByVal number As Byte, ByVal digits As Integer ) As String

Declare Function Oct( ByVal number As Short ) As String
Declare Function Oct( ByVal number As Short, ByVal digits As Integer ) As String

Declare Function Oct( ByVal number As Integer ) As String
Declare Function Oct( ByVal number As Integer, ByVal digits As Integer ) As String

Declare Function Oct( ByVal number As LongInt ) As String
Declare Function Oct( ByVal number As LongInt, ByVal digits As Integer ) As String

result = Oct[$]( number [, digits ] )

number
digits

Строка, содержащая беззнаковое восьмеричное представление number.

Возвращает беззнаковое восьмеричное строковое представление number. Восьмеричный digits в диапазоне от 0 до 7.

Если вы укажете digits > 0, результирующая строка будет именно этой длины. Это будет усечено нулями слева, при необходимости.

Длина возвращаемой строки не будет больше, чем максимальное количество цифр для типа number (3 символа для Byte, 6 для Short, 11 для Integer, и 22 для LongInt)

Если вы хотите сделать наоборот, т.е. преобразовать восьмеричную строку обратно в число, самый простой способ сделать это заключается в указании в начале строки "&O", и преобразовать ее с помощью ValInt или ValLng, Аналогично для обычной числовой строки. Например ValInt("&O77")

Print Oct(54321)
Print Oct(54321, 4)
Print Oct(54321, 8)

Вывод:

152061
2061
00152061

• Суффикс строкового типа "$" обязателен в диалекте -lang qb.
  
• Суффикс строкового типа "$" является необязательным в диалектах -lang fblite и -lang fb.
  
  

• В QBASIC нет никакого способа указать количество возвращаемых цифр.
  
• Размер возвращенной строки был ограничен 32 битами, или 11 восьмеричными цифрами.
  
  

• Bin
  
• Hex
  
• ValInt
  
• ValLng