之前的表格快捷键用以下代码,可以像EXCEL表格一样,多行粘贴。如今重做
一个表格,用一样的代码和事件就不行。不知设置缺少什么?
If e.keycode = Keys.d 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
此主题相关图片如下:snipaste_2023-03-01_19-06-29.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2023-3/20233119413522275.png)
![dvubb 图片点击可在新窗口打开查看](skins/default/filetype/png.gif)
此主题相关图片如下:snipaste_2023-03-01_19-06-53.png
![dvubb 图片点击可在新窗口打开查看](UploadFile/2023-3/20233119413514818.png)
[此贴子已经被作者于2023/3/1 19:43:02编辑过]