Skip to content

OCT


将数字转换为八进制表示

语法

vb
declare function Oct ( byval number as ubyte ) as string
declare function Oct ( byval number as ushort ) as string
declare function Oct ( byval number as ulong ) as string
declare function Oct ( byval number as ulongint ) as string
declare function Oct ( byval number as const any ptr ) as string

declare function Oct ( byval number as ubyte, byval digits as long ) as string
declare function Oct ( byval number as ushort, byval digits as long ) as string
declare function Oct ( byval number as ulong, byval digits as long ) as string
declare function Oct ( byval number as ulongint, byval digits as long ) as string
declare function Oct ( byval number as const any ptr, byval digits as long ) as string

用法

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

参数

number

一个数字或计算结果为数字的表达式。浮点数将被转换为 longint

digits

返回字符串中所需的位数。

返回值

包含 number 的无符号八进制表示的字符串。

说明

返回 number 的无符号八进制字符串表示。八进制位从 0 到 7。

如果指定 digits > 0,结果字符串将恰好为该长度。如有必要,将从左侧截断或用零填充。

返回字符串的长度不会超过 number 类型所需的最大位数(Byte 为 3 个字符,Short 为 6 个,Long 为 11 个,Longint 为 22 个)。

如果想做相反的操作,即将八进制字符串转换回数字,最简单的方法是在字符串前加上 "&O",然后使用 Cint 等函数将其转换为整数类型,类似于普通的数字字符串。例如 Cint("&O77")

示例

start GeSHi

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

end GeSHi

将产生如下输出:

152061
2061
00152061

方言差异

  • -lang qb 方言中需要字符串类型后缀 "$"。
  • -lang fblite 方言中字符串类型后缀 "$" 是可选的。
  • -lang fb 方言中字符串类型后缀 "$" 被忽略,仅在使用 -w suffix 编译选项(或 -w pedantic 编译选项)时才会警告。

与QB的区别

  • 在 QBASIC 中,无法指定返回的位数。
  • 返回字符串的大小限制为 32 位,即 11 个八进制位。

参见

  • Bin
  • Hex
  • Valint
  • Vallng

返回 目录

基于 FreeBASIC 官方文档翻译 如有侵权请联系我们删除
FreeBASIC 是开源项目,与微软公司无隶属关系