📄 20127.html
字号:
<html> <head> <title>Re: 请问关于转换SetFocus的问题!</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>Re: 请问关于转换SetFocus的问题!</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by <a href="mailto:styler33@ms26.hinet.net">styler</a> on October 14, 1999 at 10:08:04:<p>In Reply to: <a href="20101.html">请问关于转换SetFocus的问题!</a> posted by 风铃 on October 13, 1999 at 23:26:50:<p>: 我希望能在Textbox输入文字后,能把focus自动跳到另一个Textbox,我可以怎样运用Setfocus把focus自动换到另一个textbox呢 ?<p>你可以选text1的事件(这是按enter)<br>Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)<p>if keycode = vbEnter then <br> text2.setfocus <br>End Sub<p>或者写 (当text1.text长度大于N时)<br>Private Sub Text1_Change()<br> if len(text1.text) > N then<br> text2.setfocus<br> end if <br>End Sub<br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 20127--></ul><!--end: 20127--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -