Visual Basic.NET - Insertar Imagen a Tabla de DB Access

Hola amigos!!!

Necesito una ayuda por parte de uds.

Tengo una Base de datos en Access y en una de las tablas tengo un campo para almacenar imagen algun tips o ejemplo que tangan !!!

De ante mano muchas gracias.

Dim img As Byte() = SaveImage(PicImagen.Image)
Dim num As Int32
Dim guardardatos As String = "Insert into CAPTURADORES(CEDULA_CAPTURADOR,NOMBRE,Imagen) values ('" & Me.txt_cedula.Text.Trim) & "','" & (Me.txt_nombre.Text.Trim) & "',@Imagen)"

Dim olecommand As New OleDb.OleDbCommand(guardardatos, objConexion)
olecommand.CommandType = CommandType.Text

Dim parImagen As OleDbParameter = New OleDbParameter("@imagen", OleDbType.VarBinary, img.Length)
parImagen.Value = img
olecommand.Parameters.Add(parImagen)


Function LoadImage(ByVal imageData As Byte()) As Image
Try
Dim imageStream As New IO.MemoryStream(imageData)
Dim imageObject As Image
imageStream.Flush()
imageObject = Image.FromStream(imageStream)
imageStream.Close()
Return imageObject
Catch ex As Exception
MsgBox("Error al cargar imagen.")
Return Nothing

End Try
End Function

Function SaveImage(ByVal imageObject As Image) As Byte()
Try
Dim imageStream As New IO.MemoryStream
Dim imageData As Byte()
imageObject.Save(imageStream, System.Drawing.Imaging.ImageFormat.Jpeg)
imageStream.Flush()
imageData = imageStream.GetBuffer()
Return imageData
Catch ex As Exception
Return Nothing
MsgBox("Error al guardar imagen.")
End Try
End Function


If Not objConjuntoDatos.Tables(0).Rows(EncRow).Item("IMAGEN").ToString = String.Empty Then
PicImagen.Image = LoadImage(CType(objConjuntoDatos.Tables(0).Rows(EncRow).Item("IMAGEN"), Byte()))
End If

Gracias por responder probare ...