VB有专门的API函数CopyMemory能处理2-10进制浮点数转换和10-2进制浮点数转换。下列代码演示了10进制Single(单精度浮点型转为16进制字符显示的浮点数和其相反运算:Option ExplicitPrivate Declare Sub CopyMemory Lib "kernel32" Alias "RtlMoveMemory" (Destination As Any, Source As Any, ByVal Length As Long)Private Sub BinToSin_Click()
Dim sinStr As String
Dim sinSj As Single
Dim Buffer(...