Dim sQuery As New System.Text.StringBuilder()
Dim oDataTable As New DataTable()
Dim dtRow As DataRow
Dim imagedata() As Byte
Dim imageBytedata As MemoryStream
sQuery.Append("SELECT image FROM images WHERE imageId = " & _
cmbImgIds.SelectedItem)
oDataTable = New Connection().doDBconnection(sQuery.ToString, "Image")
For Each dtRow In oDataTable.Rows
imagedata = dtRow.Item("image")
imageBytedata = New MemoryStream(imagedata)
Next
picBox.Image = Image.FromStream(imageBytedata)