OCT
- 来源: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgOct
- 最后更新: 2020-09-12
将数字转换为八进制表示
语法
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 个八进制位。
参见
BinHexValintVallng
返回 目录