示例:
Private Sub TreeView1_NodeClick(ByVal node As MSComctlLib.node)
Text1.text = TreeView1.SelectedItem.key
Adodc1.RecordSource = "select * from StudentInfo where name=" + Trim(Text1.text) + ""
Adodc1.Refresh
If Adodc1.Recordset.RecordCount <> 0 Then
Text2.text = Adodc1.Recordset.Fields("age")
Text3.text = Adodc1.Recordset.Fields("email")
End If
End Sub
對節(jié)點的引用采用二處方法
1、節(jié)點的key值 TreeView1.SelectedItem.key
2、節(jié)點的text TreeView1.SelectedItem.text
本站僅提供存儲服務(wù),所有內(nèi)容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容,請
點擊舉報。