主题：增加一行后某列单元格内容自动等于上一单元格中的内容

老师好，我设计了一个窗口，窗口中有一个增加行按钮，窗口插入一个表并已经绑定，如何实现增加一行后某列单元格内容自动等于上一单元格中的内容？

按钮代码这样写

 

Dim t As Table = Tables("表A")
If t.Rows.count = 0 Then
    t.addnew
Else
    Dim r As Row = t.Rows(t.rows.count-1)
    Dim nr As Row = t.addnew
    nr("第一列") = r("第一列")
    nr("第二列") = r("第二列")
End If

非常非常感谢老师！