ツリービューのノードを閉じたときに選択されてしまうのを防ぐには？ (ID:121594)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 サンプルコードを書いてみました。 Option Explicit Private Sub Form_Load() Dim i As Integer Form1.Height = 8000 Form1.Width = 8000 TreeView1.Top = 0 TreeView1.Left = 0 TreeView1.Height = 7000 TreeView1.Width = 7000 TreeView1.LineStyle = tvwRootLines Call TreeView1.Nodes.Add(, , "top", "top", "Folder") Call TreeView1.Nodes.Add(, , "top2", "top2", "Folder") Call TreeView1.Nodes.Add("top", tvwChild, "root", "root", "Folder") Call TreeView1.Nodes.Add("top", tvwChild, "root2", "root2", "Folder") For i = 0 To 50 Call TreeView1.Nodes.Add("root", tvwChild, "a1" & i, i & "1000", "Folder") Next For i = 0 To 50 Call TreeView1.Nodes.Add("root2", tvwChild, "a2" & i, i & "1000", "Folder") Next For i = 0 To 50 Call TreeView1.Nodes.Add("a11", tvwChild, "41000\a" & i, i & "2000", "Folder") Next End Sub 1.プログラム起動後、top2を選択します。 2.topのプラスを押し、ノードを展開します。 3.さらに、その下のrootのプラスを押し、ノードを展開します。 4.rootのプラスを押し、ノードを閉じます。 5.その時に、topが選択されてしまわないでしょうか？ 以上のようですが、どうでしょうか？