2015-08-21 96 views
0

因此,在使用CodeDom編譯代碼時解決了我的問題後,我遇到了與代碼有關的另一個問題。這是令人困惑的,因爲代碼在我運行時運行得非常好 - 只有在我嘗試編譯它時纔會發生。 我的代碼執行此操作: 對於目錄C:\ temp \中的每個文件 - 如果文件名包含「123」,則將其添加到字符串列表中。使用CodeDom編譯時處理錯誤

Dim file_list As New List(Of String) 
     Dim temp_directory As New IO.DirectoryInfo("C:\temp\") 
     Dim get_file_info As IO.FileInfo() = temp_directory.GetFiles() 
     Dim item As IO.FileInfo 
     For Each item In get_ssfn_files 
      If item.ToString.Contains("123") Then 
       file_list.Add(item.ToString) 
      End If 
     Next 

然後,它會對每個語句中的每個文件執行一些操作。

For Each file_found in file_list 
    'Do Something 
Next 

錯誤似乎發生在這條線:

對於file_list中每個file_found

我不知道爲什麼,因爲就像我說的,當時我的代碼工作正常我沒有用CodeDom編譯它。任何人都知道如何去解決這個問題?提前致謝。

回答

0

如果使用Option Infer Off編譯代碼,則需要指定file_found的類型。

For Each file_found As String In file_list 
    'Do Something 
Next 
+0

非常感謝:D – suffice