调用点击treeview某一节点的问题？

Question

我有下面一段程序：
Private Sub Treeview1_NodeClick(ByVal Node As MSComctlLib.Node)
   Call OnDtOpenDt
 End Sub
然后我想在form.load程序里，调用点击treeview某一节点（node.key="db")的程序.应该在form.load怎么调用,怎么写?谢谢!

Answer 1

Option ExplicitPrivate Sub Form_Load()
    TreeView1.Nodes.Add , , "db", "aaaa"
    TreeView1.Nodes.Add , , , "bbbb"
    
    TreeView1_NodeClick TreeView1.Nodes("db") '调用
    
End SubPrivate Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
    If Node.Key = "db" Then MsgBox "dd"
End Sub