编写八进制数与十进制数相互转换的过程。①过程ReadOctal,读入八进制数,然后转换为等值的十进制数。②过

[复制链接]
查看11 | 回复2 | 2011-11-26 18:39:00 | 显示全部楼层 |阅读模式
1、public function ReadOctal(byval lngOct as long) as long
ReadOctal=val("&O" & cstr(lngOct))end function2、public function WriteOctal(byval lngDec as long) as string
WriteOctal=Oct(lngDec)end function...
回复

使用道具 举报

千问 | 2011-11-26 18:39:00 | 显示全部楼层
先转成二进制...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行