access 2010 vba用戶定義的類型沒有用FileOpenDialog定義？

我在VBA有一個按鈕的點擊事件裏面寫當我點擊這個Access 2010中的一個代碼它給我的錯誤說「沒有定義用戶定義類型」這是我的代碼：access 2010 vba用戶定義的類型沒有用FileOpenDialog定義？

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

來源

2014-01-09 Hunar A. Ahmad

是否已經設置到Microsoft Office XX參考對象庫？ – Fionnuala

與Remou同意;我得到了同樣的錯誤，直到我有Access 2010中的下列參考：

Microsoft Office 14.0 Object Library

從VB代碼編輯器，選擇工具菜單，然後引用...

來源

2014-01-09 10:34:28 MarkHone

我選擇的圖片顯示每個記錄沒有特定的記錄可以幫助我解決這個問題嗎？ –

+1在Access 2010及更高版本中，系統會提示您：「您想現在添加對包含庫的引用嗎？」選擇內置變量後。 – Fionnuala

Remou我不理解你？我的意思是用我的代碼，當我點擊一個按鈕獲取圖像時，它的工作成功，並在圖像控制中顯示圖像，當我點擊下一個按鈕時，它顯示圖像與我的表中的每個記錄？ –

access 2010 vba用戶定義的類型沒有用FileOpenDialog定義？

回答

相關問題