主题：[求助]关于调用的求助！！！！

1、

Dim r As e.DataRow = DataTables("考勤")find("[部门] = '安管部")
If r IsNot Nothing Then
    Tables("秩序员").Current("姓名") = r("姓名")
End If

2、

为什么会有20个表，你的设计思路肯定有问题。