從文件夾檢索數據

Question

你好朋友， 我在做vb.net編碼。我在一個文件夾中有一些excel文件。我希望所有文件都需要在Windows窗體應用程序中合併。但我想選擇一個文件夾並檢索所有文件。請任何人都可以幫助我呢？

Answer 1

你可以嘗試這樣的事情在你的代碼： -

Dim fd As OpenFileDialog = New OpenFileDialog() 
     fd.Title = "Select Excel File" 
     'insert your drive specs here 'if specific directory is searched. 
     fd.InitialDirectory = D_Drive + "\programs" 
     fd.Filter = "All files (*.xls)|*.xls|All files (*.xls)|*.xls" 
     fd.FilterIndex = 2 
     fd.RestoreDirectory = True 
     If fd.ShowDialog() = DialogResult.OK Then 
      filec = fd.FileName 
     End If 

     If filec <> "" Then 
      Shell("Excel " + filec, AppWinStyle.MaximizedFocus, True) 
     End If