Please, I'm on the verge of pulling my hair out. What am I doing wrong?
Basically I need to be able to drag nodes between different parents within a treeview.
The treeview simply does not acctept the Drop and DragDrop event is not firing.
I wrote an example code with the same effect (node drag is not working). Wham am I missing?

Code:
Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Dim root As New TreeNode("ROOT")
        root.Nodes.Add("Child1")
        root.Nodes.Add("Child2")
        root.Nodes.Add("Child3")
        TreeView1.AllowDrop = True
        TreeView1.Nodes.Add(root)
    End Sub

    Private Sub TreeView1_DragDrop(sender As Object, e As DragEventArgs) Handles TreeView1.DragDrop

    End Sub

    Private Sub TreeView1_ItemDrag(sender As Object, e As ItemDragEventArgs) Handles TreeView1.ItemDrag
        DoDragDrop(e.Item, DragDropEffects.Move)
    End Sub
End Class