Single→Long変換(ビット配列での変換)

2006/09/15 13:50

このQ&Aのポイント

WindowsXP、Visual Basic 6.0(SP6)を使用して、Single型の浮動小数点数をLong型の整数値に変換したいです。
浮動小数点数の内部形式(IEEE)を用いて、Single型のビット列をLong型のビット列として変換します。
これは、外部機器(PLC等)とのデータのやりとりを行う際に必要で、単純な16ビットデータを整数値として転送することができない状況に直面しているという問題です。

hyphenlink
お礼率0% (0/1)

Visual Basic
回答数1
ありがとう数2

みんなの回答 （1）
専門家の回答

質問者が選んだベストアンサー

ベストアンサー

todo36
ベストアンサー率58% (728/1234)

2006/09/15 18:28 回答No.1

Private Declare Sub MoveMemory _ Lib "kernel32" Alias "RtlMoveMemory" ( _ ByRef Destination As Any, _ ByRef Source As Any, _ ByVal length As Long _ ) Private Sub Form_Click() Dim a As Single Dim b As Long Dim c(1) As Integer Dim d(3) As Byte a = 12.75 MoveMemory b, a, 4 MsgBox Hex(b) MoveMemory c(0), a, 4 MsgBox Hex(c(0)) & "," & Hex(c(1)) MoveMemory d(0), a, 4 MsgBox Hex(d(0)) & "," & Hex(d(1)) & "," & Hex(d(2)) & "," & Hex(d(3)) End Sub