可以用sqlcommand先查询表,然后生成目录树。
比如
Dim cmd As New SQLCommandDim dt As DataTablecmd.CommandText = "SELECT DISTINCT 产品,客户 From {订单}"dt = cmd.ExecuteReader()Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")trv.BuildTree(dt,"产品|客户")