主题：Normal型Table表粘贴

要自己做一个 Ctrl+Q 的快捷键处理

编写 keyDown 事件

If e.keycode = Keys.Q AndAlso e.control = True Then
    For i As Integer = e.Table.topposition + 1 To e.Table.bottomposition
        e.Table.rows(i)(e.table.colsel) = e.Table.rows(i-1)(e.table.colsel)
    Next
    e.cancel = True
End If