论坛上也找了下相关帖子，发现在19时就有人提出相关问题，http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=141617&replyID=&skin=1
刚才试了下，搞个按钮，并在按钮中执行相关代码，上下移动行后的焦点问题是正常的，但用快捷键不行，上移一行后，焦点会落在第一行，下移一行后，焦点落在了最后一行
Dim tb As WinForm.Table = e.Form.Controls("生产计划辅表")
Dim t As Table = tb.Table
Select Case e.KeyCode
Case Keys.Up
Syscmd.Row.MoveUp()
Case Keys.Down
Syscmd.Row.MoveDown()
Case Keys.Add
Syscmd.Row.AddNew()
Case Keys.Multiply
Syscmd.Row.AddNews()
Case Keys.Subtract
Dim Result As DialogResult
Result = MessageBox.Show("确认要删除行吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
With t
For i As Integer = .BottomPosition To .TopPosition Step -1
.Rows(i).Delete()
Next
End With
End If
End Select
End If
加好友 
发短信
Post By：2021/9/21 11:03:00 [只看该作者]
