以下是打开窗口时,目录树加载“往来企业”表
Dim tv As WinForm.TreeViewtv = e.Form.Controls("TreeView1")tv.BuildTree("往来企业","企业类别|企业名称")
希望得到如题效果,双击节点,选定所处的行,