如题
我用485读取流量计传回数值 68 73 40 B9 (16进制)
实际流量计上显示为5.794,要如何将上面那16进制转换为
一般正常使用的10进制
厂商给的资料是说明输出格式为 32位元 浮点数
就是要16进制的32位元浮点数,转成可读的10进制
求解
我用485读取流量计传回数值 68 73 40 B9 (16进制)
实际流量计上显示为5.794,要如何将上面那16进制转换为
一般正常使用的10进制
厂商给的资料是说明输出格式为 32位元 浮点数
就是要16进制的32位元浮点数,转成可读的10进制
求解
解决方案 »
- 求一个农历函数
- VB资源
- 是不是在递归中不能使用委托把信息传到界面控件上?
- 显示窗体闪动的问题
- 关于窗体最大化得问题!
- 刚写 4行 代码就遇到了问题,高手们来救我!!!!!~~~~~~~~~~~~~~~~~~~~~
- 应该怎样才能屏蔽用CommonDialog1.ShowOpen打开对话框时鼠标右键的删除键或键盘的Delete功能?(即在打开对话框时不能删除文件或文件夹)
- 有谁用过curtprinter.ocx控件
- 怎么才能将一个文件(exe,word,excel)写入数据库(SQL)
- 关于水晶报表的问题,请高手赐教
- 请教一个关于FROM字句语法错误的问题
- 请大神帮忙看一下串口接收的数据为什么接收不完整
Dim R(3) As Byte
On Error GoTo hErr
Data = Replace(Data, " ", "")
StrToSng = 0
R(0) = CByte("&H" & Mid(Data, 3, 2))
R(1) = CByte("&H" & Mid(Data, 1, 2))
R(2) = CByte("&H" & Mid(Data, 7, 2))
R(3) = CByte("&H" & Mid(Data, 5, 2))
CopyMemory StrToSng, R(0), LenB(StrToSng)
hErr:
End Function
用法:
Debug.Print StrToSng("687340B9")
5.794