溫馨提示×

vb.net結(jié)構(gòu)體byte數(shù)組相互轉(zhuǎn)換怎么實現(xiàn)

小億
161
2023-10-24 10:53:16
欄目: 編程語言

在VB.NET中,可以使用Marshal類的PtrToStructure方法和StructureToPtr方法來實現(xiàn)結(jié)構(gòu)體和字節(jié)數(shù)組之間的相互轉(zhuǎn)換。

以下是一個示例代碼:

```vb
Imports System.Runtime.InteropServices

Public Structure MyStruct
   Public Field1 As Integer
   Public Field2 As Double
End Structure

Public Class Program
   Public Shared Sub Main()
       ' 創(chuàng)建一個結(jié)構(gòu)體實例
       Dim myStruct As New MyStruct()
       myStruct.Field1 = 10
       myStruct.Field2 = 3.14

       ' 將結(jié)構(gòu)體轉(zhuǎn)換為字節(jié)數(shù)組
       Dim byteSize As Integer = Marshal.SizeOf(myStruct)
       Dim byteArray(byteSize - 1) As Byte
       Dim structPtr As IntPtr = Marshal.AllocHGlobal(byteSize)
       Marshal.StructureToPtr(myStruct, structPtr, False)
       Marshal.Copy(structPtr, byteArray, 0, byteSize)
       Marshal.FreeHGlobal(structPtr)

       ' 將字節(jié)數(shù)組轉(zhuǎn)換回結(jié)構(gòu)體
       Dim newStruct As MyStruct = New MyStruct()
       structPtr = Marshal.AllocHGlobal(byteSize)
       Marshal.Copy(byteArray, 0, structPtr, byteSize)
       newStruct = Marshal.PtrToStructure(structPtr, GetType(MyStruct))
       Marshal.FreeHGlobal(structPtr)

       ' 輸出轉(zhuǎn)換后的結(jié)構(gòu)體字段值
       Console.WriteLine("Field1: " & newStruct.Field1)
       Console.WriteLine("Field2: " & newStruct.Field2)
   End Sub
End Class
```

運行以上代碼,將會輸出:

```
Field1: 10
Field2: 3.14
```

這樣就實現(xiàn)了結(jié)構(gòu)體和字節(jié)數(shù)組之間的相互轉(zhuǎn)換。

0