使用年、月、日生成目录树：‘在TreeView3生成目录树：
Dim cmd3 As New SQLCommand
Dim dt3 As DataTable
cmd3.ConnectionName = conn
cmd3.CommandText = "Select DISTINCT Year(分部发货日期) As 年, Month(分部发货日期) As 月, Day(分部发货日期) as 日 fr om {退货处理} "
dt3 = cmd3.ExecuteReader()
Dim trv3 As WinForm.TreeView = e.Form.Controls("TreeView3")
trv3.BuildTree(dt3,"年|月|日")
trv3.Nodes.Insert("显示所有行",0)
选择目录树节点执行代码：
Dim Filter As String
Dim dr As DataRow = e.Node.DataRow '获取生成此节点的DataRow
Dim Year As Integer = dr("年")
Dim Month As Integer = dr("月")
Dim day As Integer = dr("日")
If e.Node.Name = "显示所有行" Then
Filter = ""
Else
Select Case e.Node.Level
Case 0
Filter ="Year(日期) = " & Year
Case 1
Filter ="Year(日期) = " & Year & " And Month(日期) = " & Month
Case 2
Filter ="Year(日期) = " & Year & " And Month(日期) = " & Month & " And day(日期) = " & day
End Select
End If
DataTables("分部退货查看_Table2").LoadFilter = Filter
DataTables("分部退货查看_Table2").Load
问题：点选选择目录树节点执行
问题：点选“显示所有行“报错，其它节点正常，不知何故？
此主题相关图片如下：qq截图20160429100657退货报错.jpg
[此贴子已经被作者于2016/4/29 10:27:35编辑过]
加好友 
发短信
Post By：2016/4/29 10:26:00 [只看该作者]
