如何将图像从附件字段加载到VBA中的图像控件中

Question

我有一张桌子，其中一些图像保存到附件字段中。我需要通过VBA代码将这些图像加载到表单中的图像控件中。我的代码出了点问题。

请看一下我的代码，如下所示：

Private Sub btnTestImage_Click()
    Dim myRecordset As DAO.Recordset

    Set myRecordset = Me.Recordset

    Me.myImage.Picture = myRecordset.Fields("image").Value

    Set myRecordset = Nothing 
End Sub

感谢您的帮助。

谢谢。