以下是窗口定时器代码,时间间隔1000。打开窗口后一般会加载表,近来偶尔不加载表,是不是数据量大了以后与1000ms的时间间隔有关?
TimerTick
If DataTables.Contains("成品总帐") = False And DataTables.Contains("成品明细") = False And DataTables.Contains("成品帐页") = False And DataTables.Contains("成品月结") = False Then
e.Form.Controls("Label1").Text = "正在加载表...请稍候"
Application.DoEvents() '即刻暂停代码的执行,重新绘制控件后,继续执行代码
DataTables.Load("成品总帐|成品明细|成品帐页|成品月结")
Else
e.Form.TimerEnabled=False
e.Form.Close()
End If
MainTable = Tables("成品总帐") '切换主表
Forms("成品台帐").Open()