VB.NET, C#, PowerShell Tipsサイト

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
    Dim selectedFolder As String

    'ダイアログを表示する
    If FolderBrowserDialog1.ShowDialog = DialogResult.OK Then
        '選択されたフォルダを取得
        selectedFolder = FolderBrowserDialog1.SelectedPath

        MessageBox.Show(selectedFolder & " が選択されました。")
    End If
End Sub