访问未使用 FileOpenDialog 定义的 2010 vba 用户定义类型？

Posted 2023-05-06

【中文标题】访问未使用 FileOpenDialog 定义的 2010 vba 用户定义类型？

【英文标题】：access 2010 vba user defined type not defined with FileOpenDialog?

【发布时间】：2014-01-09 10:12:02

【问题描述】：

我在 vba 中有一个代码，当我点击它时，我在按钮的点击事件中写入了 access 2010，它给了我错误说“用户定义的类型未定义”这是我的代码：

Private Sub cmdBrowse_Click()
Dim FileOpenDialog As FileDialog
Set FileOpenDialog = Application.FileDialog(msoFileDialogFilePicker)
Dim SelectedFile As Variant
Dim db As DAO.Database
Set db = CurrentDb
With FileOpenDialog
    .AllowMultiSelect = False
    .Title = "Select A File To Use As A Logo"
    .Filters.Clear
    .Filters.Add "Images", "*.gif; *.jpg; *.jpeg;*.bmp;*.png"
    .ButtonName = "Use This File"
   If .Show = True Then
      For Each SelectedFile In .SelectedItems
        Dim LogoFile As String
        LogoFile = SelectedFile
        Dim barewabarayate As Recordset
        Set barewabarayate = db.OpenRecordset("barewabarayate")
        With barewabarayate
            .Edit
            barewabarayate.Fields("image_path") = LogoFile
            barewabarayate.Update
          End With
        Next
    End If
    End With
End Sub

【问题讨论】：

您是否设置了对 Microsoft Office x.x 对象库的引用？

【参考方案1】：

同意雷穆；在 Access 2010 中有以下参考之前，我得到了同样的错误：

Microsoft Office 14.0 Object Library

在 VB 代码编辑器中，选择“工具”菜单，然后选择“参考”...

【讨论】：

我选择的图片显示为每条记录而不是特定记录，谁能帮我解决这个问题？

+1 在 Access 2010 及更高版本中，系统会提示您：“您现在要添加对包含库的引用吗？”选择内置变量后。

Remou 我听不懂？我的意思是我的代码，当我单击一个按钮以获取图像时，它会成功运行并在图像控件中显示图像，当我单击下一个按钮时，它会在表中的每条记录中显示图像？