【问题标题】:access 2010 vba user defined type not defined with FileOpenDialog?访问未使用 FileOpenDialog 定义的 2010 vba 用户定义类型?
【发布时间】: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 对象库的引用?

标签: ms-access-2010


【解决方案1】:

同意雷穆;在 Access 2010 中有以下参考之前,我得到了同样的错误:

Microsoft Office 14.0 Object Library

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

【讨论】:

  • 我选择的图片显示为每条记录而不是特定记录,谁能帮我解决这个问题?
  • +1 在 Access 2010 及更高版本中,系统会提示您:“您现在要添加对包含库的引用吗?”选择内置变量后。
  • Remou 我听不懂?我的意思是我的代码,当我单击一个按钮以获取图像时,它会成功运行并在图像控件中显示图像,当我单击下一个按钮时,它会在表中的每条记录中显示图像?
猜你喜欢
  • 1970-01-01
  • 2023-03-09
  • 1970-01-01
  • 2017-10-30
  • 2014-08-07
  • 1970-01-01
  • 2013-01-22
  • 2016-08-24
  • 1970-01-01
相关资源
最近更新 更多