vb.net winformsでSQL Serverの画像ボックスに画像を表示

Question

テーブル内image列は0xFFとして格納されています...この形式のファイルをvb.net winformsの画像ボックスに表示する方法は？私は、コードの下にしようとしたが、作業のおかげ..

Private Sub DisplayNameAttribute_UserImage()  
    Try 
     strimage = "SELECT userimage from MKBLOGIN where empcode='" & str_empcode & "'" 
     imagedatabytes = objcommonvalidation.func_loadUserImage(strimage)  
     mem = New MemoryStream(imagedatabytes)  
     PictureBox1.Image = ToImage(imagedatabytes)  
    Catch ex As Exception 

    End Try 
End Sub 

Public Function func_loadEmpImage(ByVal str_query As String) As Byte() 
    Try 
     Dim ds As New DataSet 
     da = New SqlDataAdapter(str_query, con) 
     da.Fill(ds) 

     If ds.Tables(0).Rows.Count > 0 Then 
      data = New Byte(0) {} 
      data = ds.Tables(0).Rows(0)("userimage") 
     End If 

     Return data.ToArray() 
    Catch ex As Exception 
     Return data.ToArray() 
    End Try 
End Function 

Public Shared Function ToImage(Data As Byte()) As Image 
    If Data Is Nothing Then 
     Return Nothing 
    End If 
    Dim img As Image 
    Using stream As New MemoryStream(Data) 
     Using temp As Image = Image.FromStream(stream) 
      img = New Bitmap(temp) 
     End Using 
    End Using 
    Return img 
End Function 

Answer 1

cmd = New SqlCommand("Select userimage from table", con) 
dr = cmd.ExecuteReader 
dr.read 

Dim ImgStream As New IO.MemoryStream(CType(sqldr("userimage"), Byte())) 
PictureBox1.Image = Image.FromStream(ImgStream) 
ImgStream.Dispose()