Open file dialog: Filter,Initial Directory,Title, CheckFileExists

Imports System
Imports System.Drawing
Imports System.Data
Imports System.IO
Imports System.Collections
Imports System.Windows.Forms
Imports System.Drawing.Printing

Public Class MainClass
    Shared Sub Main()
        Dim myFileDialog As OpenFileDialog = New OpenFileDialog()

        With myFileDialog
            .Filter = "Text files (*.txt)|*.txt|All files (*.*)|*.*"
            .FilterIndex = 1
            .InitialDirectory = "C:\"
            .Title = "Open File"
            .CheckFileExists = False
        End With

        If myFileDialog.ShowDialog() = DialogResult.OK Then
            Console.WriteLine(myFileDialog.FileName)
        End If
        myFileDialog = Nothing
    End Sub
End Class

Related examples in the same category

1.	Add action Listener to Save Button on A Save File Dialog
2.	File open dialog
3.	File save dialog
4.	File Open dialog: file filter
5.	File save dialog: File filter, Default name, Overwrite Prompt and title

Open file dialog: Filter,Initial Directory,Title, CheckFileExists : Dialog File Save Open « GUI « VB.Net

Related examples in the same category