主题：请教使用怎么实现使用年限的问题

参考代码

Dim cs() As String = {"第一列", "第二列", "第三列"}

Dim r1 As Row = Tables("表A").rows(0)
Dim r2 As Row = Tables("表A").rows(1)

For Each c As String In cs
    Dim temp As String = r1(c)
    r1(c) = r2(c)
    r2(c) = temp
Next