从文件夹中检索数据

时间:2016-11-09 04:46:02

标签: vb.net

你好朋友,               我正在vb.net中编码。我在一个文件夹中有一些excel文件。我希望所有文件都需要在Windows窗体应用程序中合并。但我想选择一个文件夹并检索所有文件。请有人帮我吗?

1 个答案:

答案 0 :(得分:0)

你可以在你的代码中尝试这样的事情: -

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