示例:
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
對節點(diǎn)的引用采用二處方法
1、節點(diǎn)的key值 TreeView1.SelectedItem.key
2、節點(diǎn)的text TreeView1.SelectedItem.text
本站僅提供存儲服務(wù),所有內容均由用戶(hù)發(fā)布,如發(fā)現有害或侵權內容,請
點(diǎn)擊舉報。