Foxtable(狐表)用户栏目专家坐堂 → 代码错在哪里?


  共有2158人关注过本帖平板打印复制链接

主题:代码错在哪里?

帅哥哟,离线,有人找我吗?
ybmjy
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:428 积分:4705 威望:0 精华:3 注册:2009/7/4 13:40:00
代码错在哪里?  发帖心情 Post By:2019/1/19 19:06:00 [只看该作者]

为什么下面的代码只能复制一条选中行的数据
With Tables("员工工资表")
    Dim n As Integer = .BottomPosition -.TopPosition
    Dim m As Integer = n+1
    Dim dr As Row = Tables("考勤表").AddNew(m)
    For i As Integer = .TopPosition To .BottomPosition
        dr("姓名") = Tables("员工工资表").Rows(i)("姓名")
    Next
End With

 回到顶部