如何将"浏览到文件"对话框添加到VB.NET应用程序

Dav*_*vid 27 vb.net file-io

在VB.NET Windows窗体应用程序中,如何为某人添加单击按钮或图像的功能,并打开文件浏览器以浏览到文件并将其路径分配给变量,以便将该文件复制到另一个特定路径?

Seb*_*ian 48

您应该像这样使用OpenFileDialog类

Dim fd As OpenFileDialog = New OpenFileDialog() 
Dim strFileName As String

fd.Title = "Open File Dialog"
fd.InitialDirectory = "C:\"
fd.Filter = "All files (*.*)|*.*|All files (*.*)|*.*"
fd.FilterIndex = 2
fd.RestoreDirectory = True

If fd.ShowDialog() = DialogResult.OK Then
   strFileName = fd.FileName
End If
Run Code Online (Sandbox Code Playgroud)

然后,您可以使用File类.

  • 派对的时间已经很晚了,但也许还想知道Multiselect属性,因为就目前而言,如果有人使用这段代码,如果选择了多个文件,它会有一些意想不到的结果. (5认同)
  • 如果打开对话框并选择路径,则取消对话框.下次打开对话框时,如果restoreDirectory设置为true,则会再次显示第一个选择的路径.有关详细信息,请参阅http://msdn.microsoft.com/en-us/library/system.windows.forms.filedialog.restoredirectory.aspx (2认同)

SLa*_*aks 11

你正在寻找OpenFileDialog班级.

例如:

Sub SomeButton_Click(sender As Object, e As EventArgs) Handles SomeButton.Click
    Using dialog As New OpenFileDialog
        If dialog.ShowDialog() <> DialogResult.OK Then Return
        File.Copy(dialog.FileName, newPath)
    End Using
End Sub
Run Code Online (Sandbox Code Playgroud)