主题：方向键切换所在控件光标

1、你文本框的命名必须规则，比如 txt_1_1  txt_2_3  如 txt_横向位置_纵向位置

2、编写keydown事件，写代码，如

If e.keycode = keys.down Then

    dim x = e.sender.name.split("_")(1)

    dim y = e.sender.name.split("_")(2)

    e.form.controls("txt_" & x & "_" & y+1).select  '横坐标不变，纵坐标加1

    e.cancel = true

End If