主题：目录树请教

 参考

Select Case e.Node.Level
    Case 0
        If DataTables.Contains(e.Node.Text) Then
            e.Form.Controls("Table1").Table.DataSource = DataTables(e.Node.Text)
        End If
End Select