Mega Code Archive

 
Categories / VB.Net Tutorial / GUI
 

Set InitialDirectory for SaveFileDialog

Imports System.Windows.Forms public class SaveFileDialogWith    public Shared Sub Main         Dim SaveFileDialog1 As SaveFileDialog = New System.Windows.Forms.SaveFileDialog         With SaveFileDialog1             .DefaultExt = ".txt"             .Filter = "Text Files|*.txt"             .InitialDirectory = "C:\My Documents"         End With         If SaveFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then             Console.WriteLine(SaveFileDialog1.FileName)         End If    End Sub End class