一个浮点数占4个字节,如何获得一个浮点数转换而来的四个字节的数字呢?还有如何将四个字节数据转换成一个浮点数!

mikezfq 2008-02-16 03:39:33
在VB60中可以很方便的将浮点数得到四个字节,或者相反的操作,比如,将4个字节转换成一个浮点数,
Public Type mybyte
my_byte(3) As Byte
End Type
Public Type mysingle
my_single As Single
End Type

Public Function b_s(g0 As Byte, g1 As Byte, g2 As Byte, g3 As Byte)
Dim yourbyte As mybyte
Dim yoursingle As mysingle

yourbyte.my_byte(0) = g3
yourbyte.my_byte(1) = g2
yourbyte.my_byte(2) = g1
yourbyte.my_byte(3) = g0

LSet yoursingle = yourbyte
b_s = yoursingle.my_single
End Function

dim sglTemp as single
sglTemp =b_s(100,200,100,100)
就可以将100,200,100,100四个字节转换出一个浮点数了
请问:在vb.net如何实现?!!
...全文
1011 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
足球中国 2008-02-16
  • 打赏
  • 举报
回复
好人就是有好报的.
结贴就是好人.
vrhero
也是好人
mikezfq 2008-02-16
  • 打赏
  • 举报
回复
不是不加!系统说当天无法进行这样的操作!呵呵,明天!
vrhero 2008-02-16
  • 打赏
  • 举报
回复
知道答案了就结帖吧...这么简单的问题不用加分了...呵呵...
llsus 2008-02-16
  • 打赏
  • 举报
回复
知道了,所以没事要多看CSDN,可以学到一些自己不会的
mikezfq 2008-02-16
  • 打赏
  • 举报
回复
谢谢vrhero,原来VB60用的很顺手,现在vb.net复杂多了,知道MSDN应该有解决的地方,太大,也不知道到哪找呀,试验了一下,结果对的,太写谢谢了,明天加分呵呵!

to: llsus
看到楼上的回答,你也知道如何了把!呵呵,
llsus 2008-02-16
  • 打赏
  • 举报
回复
我一直都不会弄,有需要时就把浮点数写入文件,然后一个字节一个字节读出来的
vrhero 2008-02-16
  • 打赏
  • 举报
回复

BitConverter.GetBytes(Single)

BitConverter.ToSingle(byte[] value,int startIndex)


没事儿多看MSDN...

16,721

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧