老师：生成后台目录树怎样在显示的目录树中日期已签订日期 YM 格式显示？

\'生成数据表

Dim cmd As New SQLCommand

cmd.ConnectionName = "财务信息"

Dim dt As DataTable

cmd.CommandText = "SELECT DISTINCT 销售代表,签订日期,订单编号,客户名称,项目名称 From {订单登记表}"

dt = cmd.ExecuteReader()

\'生成目录树

Dim tb As New DropTreeBuilder

tb.SourceTable = dt

tb.TreeCols = "签订日期|订单编号"  ‘现为日格式

‘此处的签订日期在目录树中转换成年月（YM）格式

tb.SourceCols = "签订日期|销售代表|订单编号|客户名称|项目名称"

tb.ReceiveCols = "签订日期|销售代表|订单编号|客户名称|项目名称"

Tables("收款记录").Cols("订单编号").DropTree = tb.Build()