如何把八进制的数转化成十进制的数，VB中有相应的函数吗？

Question

Oct 函数
      返回 Variant (String)，代表一数值的八进制值。语法Oct(number)必要的 number 参数为任何有效的数值表达式或字符串表达式。说明如果 number 尚非整数，那么在执行前会先四舍五入成最接近的整数。如果 number 为 Oct 返回 
Null Null 
Empty 零 (0) 
任何其他的数字 最多可到 11 个八进制字符。 
可以将适当范围的数前缀以 &O 来直接表示八进制数字。例如，八进制表示法的 &O10 代表十进制的 8。
Oct 函数示例
本示例使用 Oct 函数将某数值转换为 8 进制表达式。Dim MyOct
MyOct = Oct(4)    ' 返回 4。
MyOct = Oct(8)   ' 返回 10。
MyOct = Oct(459)   ' 返回 713。

Answer 1

=Val("&O" & 八进制数)比如：
=Val("&O" & "10")
用CInt、CLng也行：
=CInt("&O" & 八进制数)
=CLng("&O" & 八进制数)