C# と VB.NET の質問掲示板

お世話になります。

環境　VB.NET 2010

バイト配列を構造体に取得する方法を教えてもらえないでしょうか。


処理１は成功しています。
処理２の�Bの処理で悩んでいます。


■処理１
�@構造体にデータを設定して、バイナリ―ファイルに出力(FilePut)
�Aバイナリファイルを構造体に読み込み(FileGet)

■処理２
�@構造体にデータを設定して、バイナリ―ファイルに出力(FilePut)
�Aバイナリ―ファイルをリソースにする
   (My Project→リソースの追加→既存ファイルの追加)
�BリソースファイルをByte()で読み込んだものを構造体にセットしたい。



バイナリ―ファイルだけの出力と読込の構造体セットはできたのですが、
バイナリ―ファイルをリソース化（Byte化）にしてそれを構造体に
読み込みしたいのです。
下記関数を作成していただける方お願いできないでしょうか。
Call ByteToKouzoutai(testdat, data_r)


ご教授の程よろしくお願いします。



Structure MyData
    Public Nen    As String
    Public Tuki   As String
    Public Hi     As String
    Public Ptn()  As Integer
End Structure


Public Class Form1

Dim path     As String = "c:\test.dat"

'■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
'■バイナリ―ファイルを作成
'■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
Private Sub Button1_Click( sender As System.Object,  e As System.EventArgs) Handles Button1.Click
    DataWrite()
End Sub
'===バイナリ―ファイル書き込み=============================================    
Private Sub DataWrite()
    Dim data_w   As MyData
    Dim ptn(5)   As Integer

　  ptn(0) = 1
    ptn(1) = 2
    ptn(2) = 3
  
    data_w.Nen      = "2016"
    data_w.Tuki     = "05"
    data_w.Hi       = "03"
    data_w.Ptn      = ptn

    Dim n as Integer = FreeFile()
    FileOpen(n, path, OpenMode.Binary)
    FilePut(n, data_w)
    FileClose(n)
End Sub

'■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
'■バイナリ―ファイルを読み込み
'■■■■■■■■■■■■■■■■■■■■■■■■■■■■■
Private Sub Button2_Click( sender As System.Object,  e As System.EventArgs) Handles Button2.Click
    DataRead_File()
    DataRead_Resource()
End Sub
'===読み込み(ファイル)=============================================    
Private Sub DataRead_File()
    Dim data_r   as New MyData
    Dim n        as Integer = FreeFile()

    FileOpen(n, path, OpenMode.Binary, OpenAccess.Read, OpenShare.LockWrite)
    FileGet(n, data_r)
    FileClose(n)

End Sub
'===読み込み(リソース)=============================================    
Private Sub DataRead_Resource()
    Dim data_r   as New MyData
    Dim testdat  As Byte() = My.Resources.test

    Call ByteToKouzoutai(testdat, data_r)　←●この関数を作成したい

End Sub

End Class