📄 17250.html
字号:
<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 + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -