vb中text中输入完点回车如何让焦点自动转换到按钮并使其接受?

来源:百度知道 编辑:UC知道 时间:2024/06/03 18:06:21
vb中text中输入完点回车如何让焦点自动转换到按钮并使其接受?

比如你有一个textbox叫text1,有一个commandbutton叫command1
一、如果要按回车的时候执行command_click
在text1_keypress()中加入代码

if keyascii=13 then
keyascii=0
call command1_click
end if

如果只是要转移焦点,那么设置command1的TabIndex为Text1的Tabindex的后一个(即Text1的Tabindex加1)
然后将上面的代码改成

if keyascii=13 then
keyascii=0
sendkeys "{Tab}"
end if

如果按钮的name是cmd
那么 在Text的key_down事件里写
if keycode = 13 then
cmd.setfouse
end if