[求助]遍历副本表选定行,总是有一行被漏掉
副本表显示选择框,当选中多行批量操作的时候,总有一行被漏掉,代码不会执行。实际情况是如果选择2行,执行1行,如果选择3行,执行2行;
下边是代码和截图:
For Each c As Row In Tables("还书_借阅记录").rows
If c.checked = True Then
c("归还日期") = Date.today
c("还书操作员") = _UserName
DataTables("书库").ReplaceFor("状态", "空闲", "书库编号 = '" & c("书库编号") & "'")
DataTables("书库").ReplaceFor("借阅人", "", "书库编号 = '" & c("书库编号") & "'")
End If
Next
此主题相关图片如下:2015年10月29日1.png


此主题相关图片如下:2015年10月29日2.png
