Environment.SpecialFolder.CommonProgramFiles : Environment « System « VB.Net by API

1. VB.Net by API
2. System
3. Environment

Environment.SpecialFolder.CommonProgramFiles

  
Imports System.Windows.Forms

public class FolderBrowserDialogProperty
   public Shared Sub Main

        Dim FolderBrowserDialog1 As FolderBrowserDialog = New System.Windows.Forms.FolderBrowserDialog

        With FolderBrowserDialog1
            .RootFolder = Environment.SpecialFolder.CommonProgramFiles
            .SelectedPath = "C:\Temp"
            .ShowNewFolderButton = False
            .Description = "Use the tree below to select a folder:"
        End With

        If FolderBrowserDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Console.WriteLine(FolderBrowserDialog1.SelectedPath)
        End If

   End Sub
End class

   
    
  

Related examples in the same category