主题：未知错误

此主题相关图片如下：201.png


If e.DataCol.Name = "批准开发" AndAlso e.DataRow("批准开发") = True Then
    Dim nma() As String = {"客户名称", "产品名称", "图号", "项目组长", "项目组员"} 'A表数据来源列
    Dim nmb() As String = {"策划_客户名称", "策划_产品名称", "策划_图号", "策划_项目组长", "策划_项目成员"} 'B表数据接收列
    Dim drt As DataRow = DataTables("样件制作管理系统").AddNew
    For i As Integer = 0 To nma.Length - 1
        drt(nmb(i)) = e.DataRow(nma(i))
    Next
End If

 

我按照帮助文件写的 怎么会错呢

调试技巧：http://www.foxtable.com/webhelp/scr/1485.htm，看哪一句代码出错

我都不知道是哪段代码  还是反复提醒  关都关不了

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目1 (6).foxdb

   麻烦帮看一下

怎么测试会出错？

我也不知道 那块有问题 报错的代码也没跟踪 就是不停地报错  

按什么步骤，做什么操作出错？