ツリービューのノードの表示順序を入れ替えるには？ (ID:122685)

名前

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

本文 VB6での質問です。 ツリービューで下記のようなツリーを最初に作った後 ｜＿アイテム１ ｜ ｜＿＿アイテム１１ ｜ ｜＿＿アイテム１２ ｜ ｜＿＿アイテム１３ ｜＿アイテム２ ｜＿＿アイテム２１ ｜＿＿アイテム２２ ｜＿＿アイテム２３ アイテム１とアイテム２の表示順序を子ノード共まとめて入れ替えたいのですが どのようにすればできるのでしょうか？ ｜＿アイテム２ ｜ ｜＿＿アイテム２１ ｜ ｜＿＿アイテム２２ ｜ ｜＿＿アイテム２３ ｜＿アイテム１ ｜＿＿アイテム１１ ｜＿＿アイテム１２ ｜＿＿アイテム１３ ソートによる並べ替えでなく任意の並べ替えを行いたいと思っています。 実際はマウスドラッグにより順序を入れ替えれたらいいのですが、まずコード で順序の入れ替えを行いたいと考えています。 Dim objNd1 As Node Dim objNd2 As Node Set objNd1 = TreeView1.Nodes(1) Set objNd2 = TreeView1.Nodes(1).Next Set TreeView1.Nodes(1) = objNd2 Set TreeView1.Nodes(1).Next = objNd1 のように書いてみたのですがSet TreeView1.Nodes(1) = objNd2でコンパイルエラーと なってしまいます。 よろしくお願いします。