Using myConnection As New OleDbConnection(strConnection)
myConnection.Open()
Dim strSql As String = "SELECT PICTURE FROM MT_IMAGE"
Try
Using myCommand As New OleDbCommand(strSql, myConnection)
myCommand.CommandType = CommandType.Text
Using myDataReader As OleDbDataReader = myCommand.ExecuteReader()
myDataReader.Read()
Dim ImageBytes As Byte() = CType(myDataReader(0), Byte())
Dim ms As New MemoryStream(ImageBytes)
Dim img As Image = Image.FromStream(ms)
picShow.Image = img
End Using
End Using
Catch ex As Exception
MessageBox.Show(ex.Message, "Error")
End Try
End Using