在程序中我要调用命令按钮的事件可以写成call command1_click(),我现在想调用TREEVIEW的NODECLICK事件该如何用?参数怎么得到?
treeview1_NodeClick(ByVal Node As MSComctlLib.Node)

解决方案 »

  1.   

    Private Sub Command1_Click()
     
    TreeView1_NodeClick TreeView1.Nodes("D") ' CITE BY KEY
    TreeView1_NodeClick TreeView1.Nodes(3) ' CITE BY INDEX
    End SubPrivate Sub Form_Load()
    Dim i As Integer
    For i = 1 To 20
    TreeView1.Nodes.Add , , Chr(i + 64), Chr(i + 64)
    Next
    End SubPrivate Sub TreeView1_NodeClick(ByVal Node As MSComctlLib.Node)
    MsgBox "you have clicked node " & Node.Text
    End Sub