フォルダ選択ダイアログを表示する
|
|
.NET (VB)の内容
|
【注意書き】 ●VB.NET を使っているものとします。 ●動作環境は、Windows XX を使用しているとします。
.NET でも、フォルダ選択ダイアログを表示することが可能です。
この機能を使えば、簡単に、 フォルダを選択させるダイアログを表示させ、 フォルダを指定させたり、 ダイアログ表示中に、新しいフォルダを作成させたりする アプリケーションなど簡単に作成できます。
フォームに次の様なコードを記述します
-----------VB.NETコーディングここから-------------------
1.フォームに、ボタンコントロール、 フォルダブラウザダイアログ、 を配置します。 下記は、デフォルトのオブジェクトの名前と配置を示しています。
┏━━━━━━━┓┏━━━━━━━┓ ┃Button1 ┃┃Button2 ┃ ┗━━━━━━━┛┗━━━━━━━┛ -------------------------------------------- (フォーム外) ┏━━━━━━━━━━━┓ ┃FolderBrowserDialog1 ┃ ┗━━━━━━━━━━━┛
2.ボタンコントロールの Button1 text プロパティに「表示1」と記述します。 Button2 text プロパティに「表示2」と記述します。
※説明用のためです。必須ではありません。
┏━━━━━━━┓┏━━━━━━━┓ ┃表示1 ┃┃表示2 ┃ ┗━━━━━━━┛┗━━━━━━━┛ -------------------------------------------- (フォーム外) ┏━━━━━━━━━━━┓ ┃FolderBrowserDialog1 ┃ ┗━━━━━━━━━━━┛
3.ボタンコントロールをダブルクリックして、 コードの編集を開始して、 次のコードを記述します。
Private Sub Button1_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button1.Click
Dim FolderBrowserDialog1 As New FolderBrowserDialog
FolderBrowserDialog1.ShowDialog() End Sub
Private Sub Button2_Click(ByVal sender As System.Object, _ ByVal e As System.EventArgs) Handles Button2.Click
Dim FolderBrowserDialog1 As New FolderBrowserDialog
'新しいフォルダを作成するボタンを非表示にしています FolderBrowserDialog1.ShowNewFolderButton = False FolderBrowserDialog1.ShowDialog()
End Sub
4.ビルドして実行します。
5.「表示1」ボタンを押します。
6.”新しいフォルダを作成する”ボタンを 表示して、フォルダ選択ダイアログが 表示される事を確認できます。
7.「表示2」ボタンを押します。
8.”新しいフォルダを作成する”ボタンを 表示しないで、フォルダ選択ダイアログが 表示される事を確認できます。
-----------VB.NETコーディングここまで-------------------
本サンプルでは、 ”新しいフォルダを作成する”ボタンを表示する場合と 表示しない場合の2パターンのサンプルを体験できます。
”新しいフォルダを作成する”ボタンは、規定になっている為、 あえて明示的に指定しない場合は、 ”新しいフォルダを作成する”ボタンは表示されるようです。
|
http://anetm.com/dev/d.cgi?SC=DTDTL&o=Oww
Copyright(c)2001-2006 Ai Net Makoto 記事・情報の無断転載を禁止します。
|