Visual Basic - Convertir un Array de Byes en Imagen

Aunque tengo la desgracia de compartir mi nombre con el de ese señor, les ruego que me ayuden:
Tengo una aplicación Winsock, la cual recibe un buffer desde su cliente, este buffer es un array de bytes y contiene la imagen de la pantalla del cliente. Todo trabaja, pero quiero optimizar la rutina pasando directamente el contenido del array a una variable tipo objeto o image.
¿ Se puede hacer esto ?

Gracias y Saludos

Joder..... Huguito, no jodas.....

Puedes pasarla a un archivo temporal y luego cargarla con LoadPicture.

Set Picture1.Picture = ByteToFile(MiArrayDeBytes,GetTemporaryFileName)

Para guardarla puedes hacer:

Public Function ByteToFile(ByteArray() As Byte, FileName As String) As Long
Dim hlngFile As Long

hlngFile = FreeFile

Open FileName For Binary Access Write As hlngFile

Put hlngFile, , ByteArray

Close hlngFile

ByteToFile = FileLen(FileName)

End Function

Para obtener un nombre archivo temporal:

Public Const MAX_PATH = 255

Public Declare Function GetTempFileName Lib "kernel32" Alias "GetTempFileNameA" (ByVal lpszPath As String, ByVal lpPrefixString As String, ByVal wUnique As Long, ByVal lpTempFileName As String) As Long

Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long

Public Function GetTemporaryFileName() As String
Dim strBuffer As String

strBuffer = String(MAX_PATH, " ")

GetTempPath MAX_PATH, strBuffer

GetTempFileName strBuffer, "db", 0, strBuffer

GetTemporaryFileName = Trim(Replace(strBuffer, Chr(0), vbNullString))
End Function

Muchas gracias, Cecilia.
Saludos,

Hugo Chavez Frias