AccessでVisual Basicを使用してフォルダ内のすべてのPDFを検索する

Question

だから私は非常にです。私は、フォルダを開き、フォルダ内のすべてのPDFをコンテンツ用に読みたいと思います。私はMicrosoft Guidelinesにこのコードを見つけましたが、特定のコードの期待に関するエラーを受け取った：私はこのようなエラーを取得していますなぜ

For Each foundFile As String In My.Computer.FileSystem.GetFiles(
    My.Computer.FileSystem.SpecialDirectories.MyDocuments, 
    Microsoft.VisualBasic.FileIO.SearchOption.SearchAllSubDirectories, "*.pdf") 

    Listbox1.Items.Add(foundFile) 
Next 

誰でも知っていますか？

Answer 1

が、これはSTRING`として有用

Sub Dougsloop() 

    Dim Filename As String 
    Dim path As String 

    path = "path to folder" & "\" 
    Filename = Dir(path & "*.pdf") 

    Do While Len(Filename) > 0 
     debug.print; FileName 
     'Listbox1.Items.AddItem (Filename) replace debug w/this 
     Filename = Dir 
    Loop 

End Sub