主题：[求助]Foxtable20160310更新后如下代码不执行

Foxtable20160310更新后如下代码不执行

Dim bar As WinForm.NavBar = e.Form.Controls("NavBar1")
S elect Case bar.SelectedPage.Name     

    Case "library"
        Dim ts() As String = {"FTPTreeView","library","EBookList","Historylist","libraryclassify","Subclass"}
        Forms("主窗口").StopRedraw
        For Each d As String In ts
            If DataTables.Contains(d) = False
                DataTables.Load(d)
            End If
        Next
        Forms("主窗口").ResumeRedraw
msgbox("1")

End S elect

 

问题多多，显示时钟的代码也无聊了！！！

Foxtable20160310更新的内容挺好的，可是问题多多，先删除Foxtable20160310，稳定后再说！