完全自学的菜鸟紧急请教各位大侠如何实现这种效果
Private Sub Form_Load()Dim myNod As Node
Set myNod = TreeView1.Nodes.Add(, tvwChild, "richeng", "日程安排")
Set myNod = TreeView1.Nodes.Add("richeng", tvwChild, "zao", "早")
Set myNod = TreeView1.Nodes.Add("richeng", tvwChild, "wan", "晚")
Set myNod = TreeView1.Nodes.Add("zao", tvwChild, "zao1", "早1")
Set myNod = TreeView1.Nodes.Add("wan", tvwChild, "wan1", "晚1")
End Sub
我想实现的效果是在以上代码的基础上用select case 实现 单击 "日程安排" 跳转到窗体A
单击 "早" 跳转到窗体B
代码应该怎么写啊？我真是到处找资料都没找到能用的例子才来这里请教的，谢谢！
