请教BCD码转为十进制的问题

2010-01-07 07:51:26 374 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

从Google到LLVM：5种主流clang-format预设风格横向对比（含代码对比图）本文横向对比了LLVM、Google、Chromium、Mozilla和WebKit五种主流的clang-format预设代码风格。通过同一段C++代码的格式化效果对比图，直观展示了它们在指针对齐、大括号换行、缩进等关键细节上的差异，并提供了基于团队背景与项目基因的选型决策指南。阅读详情

8421组合BCD码，想转为十进制
dim a as byte =&h18 （十位为1 ，个位为8）
程序写法:
十位个位
dim b as integer = ((a And &HF0) /16 )*10 + a And &HF

msgbox((((a And &HF0) /16 )*10).Tostring ) 得出结果为 1
msgbox((( a And &HF).Tostring ) 得出结果为8
msgbox(b.tostring) 得出结果为2

当我把代码改成
十位个位
dim b as integer = CByte(((a And &HF0) /16 )*10) +CByte( a And &HF)
msgbox((((a And &HF0) /16 )*10).Tostring ) 得出结果为 1
msgbox((( a And &HF).Tostring ) 得出结果为8
msgbox(b.tostring) 得出结果为18

只要我的个位小于等于5，我用
dim b as integer = ((a And &HF0) /16 )*10 + a And &HF
可以得到正确的十进制值，大于16后就会有问题，

请个位大大帮忙分析一下为什么会这样？

...全文