通过以下代码已实现按Tab键时Focus到下一个控件,如何实现Shift+Tab回到上一个TabIndex的控件上面
Dim im As New FarPoint.Win.Spread.InputMap()
Dim tab As New FarPoint.Win.Spread.Keystroke(Keys.Tab, Keys.None)
Dim enter As New FarPoint.Win.Spread.Keystroke(Keys.Enter, Keys.None)
im = conItem.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenAncestorOfFocused)
im.Put(tab, SpreadActions.None)
im.Put(enter, SpreadActions.MoveToNextRow)
im = conItem.GetInputMap(FarPoint.Win.Spread.InputMapMode.WhenFocused)
im.Put(tab, SpreadActions.None)
im.Put(enter, SpreadActions.MoveToNextRow) |
|