DOBON.NET DOBON.NETプログラミング掲示板過去ログ

フォルダの選択ダイアログを表示する

分類:[全般]

トピックスにある【フォルダの選択ダイアログを表示する(NET Framework 1.0)】
を参考にして複数フォルダの選択ダイアログを作成したいのですが
どうしても複数選択ができません。
どなたかご存知でしたらお教えください。
■No59に返信(keiさんの記事)
> トピックスにある【フォルダの選択ダイアログを表示する(NET Framework 1.0)】
> を参考にして複数フォルダの選択ダイアログを作成したいのですが
> どうしても複数選択ができません。
> どなたかご存知でしたらお教えください。

自分でそのようなフォームを作成しない限り、無理ではないかと思うのですが。
> 自分でそのようなフォームを作成しない限り、無理ではないかと思うのですが。

管理人さまへ

早速のご回答、ありがとうございます。
まだ初心者なので自力でのフォーム作成は遠い先になってしまいますが
勉強しながら作成していきたいと思います。
また、わからないことがありましたらご指導の程、宜しくお願いいたします。
2003/06/29(Sun) 13:38:37 編集(投稿者)
2003/06/29(Sun) 13:38:21 編集(投稿者)

私もフォルダを選択するダイアログの作成でわからない点があるのですが、どなたかわかる方はいらっしゃいますか?

vb.net でtipsの【フォルダの選択ダイアログを表示する(NET Framework 1.0)】を参考にしてプログラムを書いているのですが、ダイアログからパスの情報を取り出したいのですが、やり方が分かりません。

例えばボタンをクリックすると、ダイアログが開いてフォルダを選択した後にテキストボックスなどに、パスを表示させるようにしたいです。

分かる方がいらっしゃいましたら、よろしくお願いします。

ソースコードはこのように書いております。全部どぼんさんの作成したものを転用しております。

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'FolderBrowserDialogクラスのインスタンスを作成
Dim fbd As New BrowseFolder()
Console.WriteLine(fbd.BrowseDialog("フォルダを選んでください。", Me))


End Sub
Public Class BrowseFolder
Inherits System.Windows.Forms.Design.FolderNameEditor
Dim fb As New System.Windows.Forms.Design.FolderNameEditor.FolderBrowser()
Public Function BrowseDialog(ByVal description As String, _
ByVal owner As Form) As String
'説明を指定
fb.Description = description
'はじめのフォルダを指定
fb.StartLocation = _
System.Windows.Forms.Design.FolderNameEditor.FolderBrowserFolder.Desktop
'スタイルを指定
fb.Style = _
System.Windows.Forms.Design.FolderNameEditor.FolderBrowserStyles.RestrictToDomain
If fb.ShowDialog(owner) = DialogResult.OK Then
Return fb.DirectoryPath
Else
Return String.Empty
End If
End Function
End Class
> vb.net でtipsの【フォルダの選択ダイアログを表示する(NET Framework 1.0)】を参考にしてプログラムを書いているのですが、ダイアログからパスの情報を取り出したいのですが、やり方が分かりません。

BrowseFolder.BrowseDialogメソッドが返します。つまり、

TextBox1.Text = fbd.BrowseDialog("フォルダを選んでください。", Me)

のようにしてください。
ありがとうございました。

解決いたしました。これからも”どぼんさん”のページを活用させていただきます。

DOBON.NET | プログラミング道 | プログラミング掲示板