以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  按Enter定位不到指定控件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=184634)

--  作者:zyxhx
--  发布时间:2022/12/18 18:59:00
--  按Enter定位不到指定控件
请老师帮忙看一下以下代码问题出在哪里?怎么也定位不到指定控件"Button6",而是定位到了"Button7"

If e.KeyCode = Keys.enter Then \'如果按下的是回车按键
Dim nb As String = e.Form.Controls("NumericComboBox1").text
    If nb = Nothing Then
        msgbox("请输入收入金额后继续!",64,"提示")
    Else
        e.Form.Controls("Button6").Select()
    End If
End If

请老师指点。

--  作者:有点蓝
--  发布时间:2022/12/18 20:01:00
--  
If e.KeyCode = Keys.enter Then \'如果按下的是回车按键
e.cancel=true
……

--  作者:zyxhx
--  发布时间:2022/12/18 20:24:00
--  
谢谢老师,可以了。谢谢谢谢!只是不太理解为什么非得设为TRUE来取消此次按键才能执行?
--  作者:有点蓝
--  发布时间:2022/12/18 20:37:00
--  
控件回车有自己的默认行为,如果不取消,执行完毕代码后会继续执行自己的默认行为。
--  作者:zyxhx
--  发布时间:2022/12/18 20:48:00
--  
明白了,感谢老师指点。