发新帖我要提问
返回列表
打印

VB数值加法求助

[复制链接]
1190|4
手机看帖
扫描二维码
随时随地手机跟帖
跳转到指定楼层
楼主
fxhfxh|  楼主 | 2013-8-9 15:40 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
TE
本帖最后由 fxhfxh 于 2013-8-9 15:42 编辑

VB 没有学过，都是临时看书，但下面的问题确实不知错在什么地方。
cc_sum = Mid(P, 14, 2)
Text1.Text = cc_sum
已知 cc_sum=8e(也就是(Mid(P, 14, 2)=8e), 现在要把2个8e相加，即cc_sum =Mid(P, 14, 2)  + Mid(P, 14, 2) 照理应该 8e+8e=11c, 但按这个式子得出的数是8e8e, 不管怎么转换或者定义都不能得出11c，不知错在什么地方，请知道的朋友给予指点。谢谢先。


使用特权

评论回复 赏

相关下载

相关帖子
沙发
dirtwillfly| | 2013-8-9 17:26 | 只看该作者
你看看cc_sum是否被定义成字符串了？

使用特权

评论回复 赏
板凳
soso| | 2013-8-9 18:53 | 只看该作者
你现在的累加就是相当于字符串相加。如果你非要使结果类似数学的结果，相同的字母合并  就要对ASCII进行判断

使用特权

评论回复 赏
地板
fxhfxh|  楼主 | 2013-8-9 21:17 | 只看该作者
谢谢版主及楼上朋友的回复。在百度里查到了一篇**，按如下操作，可以了。因VAL函数对16进制的字母无法识别，必须将16进制化成10进制。

cc_sum =   Val("&H" & Mid(P, 14, 2)) + Val("&H" & Mid(P, 16, 2))

使用特权

评论回复 赏
5楼
fxhfxh|  楼主 | 2013-8-9 21:24 | 只看该作者
然后根据需要，再把10进制转换成16进制，就可以了。16进制转换10进制：  Val("&H" & P)，  10进制转换16进制：HEX(P).   16进制转换成10进制的这个写法，书上好像没有看见呀。:)

使用特权

评论回复 赏
返回列表
发新帖 我要提问
高级模式
B Color Image Link Quote Code 收费 Smilies
您需要登录后才可以回帖 登录 | 注册

本版积分规则

fxhfxh

52

主题

380

帖子

1

粉丝