应该是Float类型吧?在vb中是single类型 使用copymemory函数 Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)Dim bytData(3) As Byte Dim sngData As Single sngData = 12.123 '这里把single类型赋值给数组 copymeory bytdata(0),sngdata,4 sngdata = 14.321 '这里把数组赋值给single变量 copymeory sngdata,bytdata(0),4
使用copymemory函数
Private Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)Dim bytData(3) As Byte
Dim sngData As Single
sngData = 12.123
'这里把single类型赋值给数组
copymeory bytdata(0),sngdata,4
sngdata = 14.321
'这里把数组赋值给single变量
copymeory sngdata,bytdata(0),4