How to save a stdPicture that is an UDT field

[Cereal Killer]

Honestly I've had some troubles during the translation from English to Italian

Now reading again I think I've understood, but however I don't know how to do.

    Dim arr() As Byte
    
    ReDim arr(FileLen("C:\tramonto.jpg")) As Byte
    Open "C:\tramonto.jpg" For Binary As #1
    Get #1, , arr()
    Close #1

With the code above I hold the image into an array of bytes. Now, what have I to do?