QA@IT

ボタンをクリックして、親フォルダだけが選択してされていたら、親フォルダ名をメッセージボックスで、示したい

3050 PV

vb.net2010、win7を利用しています

TreeviewにCドライブの一覧を表示させています
フォルダの左横には、チェックボックスが表示されています

親フォルダ(単数複数の場合あり)のチェックボックスにチェックが入っていたら、
ボタンを押下して親フォルダ名をメッセージボックスで、表示したい

C:\フォルダ1\フォルダ2がありましたら、親フォルダとは、フォルダ1の事を言います

C:\フォルダ3がありましたら、親フォルダとは、フォルダ3の事を言います

VB.NETで行ないたく思います

ご教授下さい

下記追記しました

一応、下記コードまではできました
親フォルダをチェックしていれば、TEST とメッセージボックスで表示されます
親フォルダをチェックしていなければ、
何もメッセージボックスで表示されません

親フォルダを単数複数の両方をチェックする場合があります(単数の親フォルダだけチェックする、複数の親フォルダをチェックする)

チェックボックスにチェックが入っている
親フォルダ名をメッセージボックスで
表示させるにはどのようにしたら
よいでしょうか?

ご教授下さい

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

    Dim flg As Boolean = False
    For Each node As TreeNode In FolderTreeView.Nodes(0).Nodes
        If node.Checked Then
            flg = True
            Exit For
        End If
    Next
    If flg Then
        MessageBox.Show("TEST") 
    End If

End Sub

7/14 下記コードで可能になりました

ありがとうございました
下記でメッセージボックスに複数表示可能になりました

本当にありがとうございました

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

Dim name As String = ""

    For Each node As TreeNode In FolderTreeView.Nodes(0).Nodes
        If node.Checked Then
            name = name & node.Text & Environment.NewLine
            '  Exit For
        End If
    Next

    If String.IsNullOrEmpty(name) Then
        MessageBox.Show("要ノード選択", "警告")
    Else
        MessageBox.Show(name, "選択フォルダ一覧")
    End If

End Sub

回答

こういう感じでしょうか。
これだと、最初に見つかったものしか表示されませんが全て出したいならリスト(List(Of String))に格納して最後に出すなど工夫する必要があるかと思います。

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

    ' Dim flg As Boolean = False
    Dim name As String = ""
    For Each node As TreeNode In FolderTreeView.Nodes(0).Nodes
        If node.Checked Then
            name = node.Text
            Exit For
        End If
    Next
    If not String.IsNullOrEmpty(name) Then
        MessageBox.Show(name) 
    End If

End Sub
編集 履歴 (0)
ウォッチ

この質問への回答やコメントをメールでお知らせします。