I am trying to keep the select node highlighted.
I can keep it selected and highlighted this way but when I click on another node this stays selected. Then I have two nodes selected.

private Sub cmdMoveSlideDown_Click()
Dim currIndex as Integer
Dim mNode as Node

currIndex = getCurrentSlideIndex
currentPackage.updateSlide currIndex, 1
loadSlideList

If currIndex + 1 > tv.Nodes.Count - 1 then

set mNode = tv.Nodes.Item(2)
mNode.Selected = true
'mNode.BackColor = vbBlue

'tv.Nodes.Item(2).Selected = true
'tv.Nodes.Item(2).BackColor = vbBlue
else
set mNode = tv.Nodes(currIndex + 2)
mNode.Selected = true
' mNode.BackColor = vbBlue
'tv.Nodes.Item(currIndex + 2).Selected = true
'tv.Nodes.Item(currIndex + 2).BackColor = vbBlue
End If
needToReloadList = true
updateMenus
End Sub