主题：求助 自定编号 克隆问题

自己做个克隆行的按钮：

Dim r1 as row = Tables("xxx").Current

Dim r2 As Row = Tables("xxx").AddNew()

For Each c as Col in Tables("xxx").Cols

    r2(c.name) = r1(c.name)

Next