17250.html
来自「以电子书的形式收集了VB一些常见问题解决方法,可以很方便的查找自己需要解决的问题」· HTML 代码 · 共 23 行
HTML
23 行
<html> <head> <title>Re: textbox 往上一格或下一格的问题~~~非常紧急啊</title> </head> <body bgcolor="#FFFFFF" vlink="#808080"> <center> <h1>Re: textbox 往上一格或下一格的问题~~~非常紧急啊</h1> </center><hr size=7 width=75%><hr size=7 width=75%><p>Posted by dino on August 14, 1999 at 14:51:40:<p>In Reply to: <a href="17244.html">textbox 往上一格或下一格的问题~~~非常紧急啊</a> posted by 想得快急死了的人 on August 14, 1999 at 14:07:49:<p>有一个例子,但你要加以修改<br>在form里,有text1(0),text1(1)...text1(4)<p>Private Sub Text1_KeyPress(Index As Integer, KeyAscii As Integer)<br>If KeyAscii = 13 Then 'enter的ascii<br> If Index - 1 >= 0 Then<br> Text1(Index - 1).SetFocus<br> Else<br> Text1(4).SetFocus<br> End If<br>End If<br>If KeyAscii = 45 Then '-的ascii<br> KeyAscii = 0<br> If Index + 1 <= 4 Then<br> Text1(Index + 1).SetFocus<br> Else<br> Text1(0).SetFocus<br> End If<br>End If<p>按enter会往前跳,按-会往后跳<p><br><br><hr size=7 width=75%><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 17250--></ul><!--end: 17250--><br><hr size=7 width=75%><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?