老师,代码如下,在一般表中就可以使用,但在窗体表中就是没任何反应。
项目事件
KeyDown
If ( e.control = True AndAlso e.keycode = keys.d ) Or e.keycode = keys.F6 Then
For i As Integer = e.Table.topposition + 1 To e.Table.bottomposition
e.Table.rows(i)(e.Table.Cols(e.Table.ColSel).Name) = e.Table.rows(i - 1)(e.Table.Cols(e.Table.ColSel).Name)
Next
e.cancel = True
End If