[求助]Foxtable20160310更新后如下代码不执行 Post By:2016/3/9 22:58:00 [只看该作者]
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")