下列代码错哪了 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

多次用索引引用行数,但是一律不判断.那当然会报错.

如果表中没行怎么办? 表中行数小于14行呢?

还有遍历里面的.datarows(0)("B4") = Tables("小学校舍标准").Rows(i+1)("生均用地面积")

如果遍历到最后一行你再+1 这不是超标了吗?

所以要先判断 if DataTables("表Ⅰ").datarows.count > 0 then

再执行其他.

获取14行时要先判断 if DataTables("表Ⅰ").datarows.count >= 0 then

最重要的在遍历里面

if Tables("小学校舍标准").Rows.count > (i-1) then

.datarows(0)("B4") = Tables("小学校舍标准").Rows(i+1)("生均用地面积")

主题：下列代码错哪了