主题：SQL DATE

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "Select Distinct Year(日期) As 年, Month(日期) As 月, Date(日期) As 日 Fro m {工作列表}"
dt = cmd.ExecuteReader()
Dim trv As WinForm.TreeView = e.Form.Controls("TreeView1")
trv.BuildTree(dt, "年|月|日")
trv.Nodes.Insert("显示所有行",0)

这段代码如何修改