如何进行进制间相互转换.txt

VB技巧问答10000例 VB技巧问答10000例

我 想 你 有 一 个 错 误 的 观 点 ， 就 是 “ 用 GET语 句 读 出 的 数 据 VB都 自 动 转 变 为 十 进 制 ” 。 实 际 上 在 计 算 机 内 部 保 存 数 据 只 使 用 二 进 制 ， 只 是 为 了 让 你 看 得 方 便 ， 当 你 使 用 Print语 句 输 出 或 使 用 其 他 方 式 查 看 数 据 时 ， 都 以 十 进 制 方 式 显 示 。 如 果 你 希 望 使 用 十 六 进 制 或 八 进 制 显 示 ， 可 以 使 用 Hex或 Oct函 数 ， 如 ： 
    Dim nData As Integer 
    ...... 
    Get #1, , nData 
    Print nData, Hex(nData), Oct(nData) 
    而 如 果 你 要 转 换 一 个 十 六 进 制 或 八 进 制 表 示 的 字 符 串 为 数 字 ， 可 以 使 用 Val函 数 ， 如 ： 
    nData = Val("&HACDF") ' 十 六 进 制 
    nData = Val("&O1277") ' 八 进 制 
    如 果 要 进 行 内 码 和 字 符 （ 包 括 中 文 ） 之 间 的 转 换 请 参 考 VB的 Asc和 Chr函 数 的 帮 助 。 
<END>