如何在VB中通过Opendialog打开特定文件夹？答案

【问题标题】：How to open specific folder by Opendialog in VB?如何在VB中通过Opendialog打开特定文件夹？
【发布时间】：2019-02-11 10:09:57
【问题描述】：

我正在制作程序，将数据从保存在磁盘上的 excel 导出到表单应用程序中的文本框。

我在代码中不断本地化 excel。

 Dim ExcelApp As Excel.Application = New Excel.Application
    Dim ReteilerWorkbook As Excel.Workbook = ExcelApp.Workbooks.Open("C:\Users\TR\2.xlsx")

    With OpenFileDialog1
        .InitialDirectory = "C:\"
        .ShowDialog()
    End With

现在我想用 opendialog 添加按钮以从不同的本地化中选择 Excel。

【问题讨论】：

将 InitialDirectory 更改为您的新位置 f.e C:\Users\TR\ 或 SpecialDirectories.MyDocuments。然后 openfiledialog 将在该文件夹中启动

标签： vb.net openfiledialog

【解决方案1】：

您可以使用 OpenFileDialog 手动选择所需的文件

Dim OpenFileDialog1 As New OpenFileDialog With {
            .CheckFileExists = True
        }

        If OpenFileDialog1.ShowDialog = DialogResult.OK Then
            Dim ExcelApp As Excel.Application = New Excel.Application
            Dim ReteilerWorkbook As Excel.Workbook = ExcelApp.Workbooks.Open(OpenFileDialog1.FileName)

        End If

【讨论】：