【求助】在treeview控件中点击子节点事件问题？

wjsfeng

当我的treeview为两级时，点击子节点能够进入对应的窗体，代码如下：
Private Sub treeview1_nodeclick(ByVal Node As Object)
On Error Resume Next
If Node.Children = 0 Then
    DoCmd.OpenForm  treeview.SelectedItem.Parent.Text & treeview.SelectedItem.Text
End If
End Sub

当子节点增加到三级，四级，五级，六级，七级时这个程序有应该怎样改动？？？？？？
请大侠指点！！！！！！！！

wjsfeng

Henry D. Sy

把例子传上来

wjsfeng

就是我想打开博士下面的几个子窗体，我没有办法，请指教！！！！！！

wjsfeng

没有人回啊？？？有高手会吗？？？？？？？？

sgrshh29

If treeview1.SelectedItem.Children = 0 Then
    strPath = Replace(treeview1.SelectedItem.FullPath, "\", "")
    DoCmd.OpenForm strPath
End If

wjsfeng

谢谢！！！