主题：_Identify

各位大侠：

     我做了个提醒项目，使用外表Access，目前打开后就报警，

    代码写在“计划管理”中，代码是：

 

Dim s As Integer = DataTables("message").compute("count(_Identify)","工事担当 = '" & User.Name & "'  And 处理状况 = false ")

If s>0 Then

    Vars("sd") = s

    Forms("窗口7").Open(SysInfo.WorkingAreaWidth-580,SysInfo.WorkingAreaHeight)

    MyTimers("计划1").Enabled = False

    For i As Integer = 1 To 330

        Forms("窗口7").setbounds(SysInfo.WorkingAreaWidth-580,SysInfo.WorkingAreaHeight-i,580,300)

    Next

End If

 

同样的代码写在内表中能够正常使用

 报错？报什么错？贴出来看看。

附件

不好意思，报错图片无法上传