VB6自行编写的源代码,实现ModbusRTU协议四个字节整形 转换成浮点数据,也可以浮点数据转换为4字节整形,bas形式,用户可以直接在自己程序中调用。
Public Function MODBUSLongtoFloat32(input1 As String) As Double ‘输入格式16进制:33 46 5E 3F字符串格式
'如果是10进制数 可以调用 hex(dex1) & " " & hex(dex2) & " " & hex(dex3) & " " & hex(dex4)
Public Function MODBUSFloattoLong32(inputS As Single) As String 'IEEE754标准 浮点格式转换
我看网上介绍需要把整数部分和小数部分分开转成二进制,太复杂了,其实有非常简单的方法,看程序就知道了。相互学习。
1