i use this code on mosenove treewviev:
Code:
Private Sub TreeView1_MouseMove(Button As Integer, Shift As _
                                Integer, x As Single, y As _
                                Single)
  Dim N As ComctlLib.Node
  
    Set N = TreeView1.HitTest(x, y)
    If Not (N Is Nothing) Then
      
        Set TreeView1.DropHighlight = N
      
      Set N = Nothing
    End If
    
End Sub
possible to add also a tooltip ballon during the mouse move event?