Oct 函数
更新：2007 年 11 月
返回表示数字的八进制值的字符串。
Public Shared Function Oct( _
ByVal Number As { Byte | SByte | Short | UShort | _
Integer | UInteger | Long | ULong | Object } _
) As String
参数
- Number
必选。任何有效的数值表达式或 String 表达式。
异常
异常类型 |
错误号 |
条件 |
|---|---|---|
未指定 Number。 |
||
Number 不是 Numeric 类型。 |
如果正在升级使用无结构错误处理的 Visual Basic 6.0 应用程序，请参见“错误号”一列。（您可以根据 Number 属性（Err 对象）比较错误号。）然而，如果可能，应当考虑用 Visual Basic 的结构化异常处理概述替换这种错误控制。
备注
如果 Number 不是整数，则在计算前会先四舍五入为与其最接近的整数。
如果 Number 为 |
Oct 返回 |
|---|---|
空 |
零 (0) |
任何其他数字 |
最多为 22 个八进制字符 |
可以直接在适当范围内的数字之前使用 &O 来表示八进制数字。例如，&O10 是十进制 8 的八进制表示法。
示例
本例使用 Oct 函数返回某个数字的八进制值。
Dim TestOct As String
' Returns "4".
TestOct = Oct(4)
' Returns "10".
TestOct = Oct(8)
' Returns "713".
TestOct = Oct(459)
要求
**模块：**Conversion
**程序集：**Visual Basic 运行库（在 Microsoft.VisualBasic.dll 中）