主题：[求助]页面集合不执行

事件： selected index changed 

If e.sender.SelectedPage.name = "出库报表对账"then
    DataTables("出库报表对账").LoadOver = "单据编号"
    Tables("出库报表对账").OpenLoadTree("开单日期 YM",150,30,True)
ElseIf  e.sender.selectedpage.name = "出库报表明细"then
    DataTables("出库报表明细").LoadOver = "记录顺序"
    Tables("出库报表明细").OpenLoadTree("开单日期 YM",150,30,True)
End If

怎么代码 不执行生成目录树 或者 加载不进来表？？

谢谢