请问为什么多表同时删除行时，第一个表删除当前记录，而后面的表都删除前一条记录，与第一个表当前记录对应的记录不被删除？所有表的记录都是一一对应的。
代码
With Tables("成品输入")
If .Current IsNot Nothing Then
.Current.Delete
End If
End With
With Tables("成品结辨")
If .Current IsNot Nothing Then
.Current.Delete
End If
End With
With Tables("成品开剪")
If .Current IsNot Nothing Then
.Current.Delete
End If
End With
With Tables("成品降等")
If .Current IsNot Nothing Then
.Current.Delete
End If
End With
With Tables("成品等外")
If .Current IsNot Nothing Then
.Current.Delete
End If
End With
With Tables("成品超标")
If .Current IsNot Nothing Then
.Current.Delete
End If
End With
或
Tables("成品输入").Current.Delete
Tables("成品结辨").Current.Delete
Tables("成品开剪").Current.Delete
Tables("成品降等").Current.Delete
Tables("成品等外").Current.Delete
Tables("成品超标").Current.Delete
[此贴子已经被作者于2013-2-10 9:02:56编辑过]
加好友 
发短信
Post By：2013/2/10 9:01:00 [显示全部帖子]
