主题：[求助]目录树节点显示样式

好像没看明白。

Dim cmb2 As WinForm.CheckedListBox = e.Form.Controls("CheckedListBox1")
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.ConnectionName  = "数据库"
cmd.CommandText = "SELECT 订单号,客户,单价,数量 From {订单} where [客户] = '" & e.Form.Controls("客户").value & "'"
dt = cmd.ExecuteReader()
trv.CreateTree(dt, "订单号")
Dim Lis As List(Of String()) = dt.GetUniqueValues("", "订单号","单价","数量")
Dim str As String
For Each Li As String() In Lis
    str & = Li(0) & " " & Li(1) & " " & Li(2) & "|"
Next
cmb2.ComboList= str