1288.html
来自「VB技巧问答10000例 VB技巧问答10000例」· HTML 代码 · 共 25 行
HTML
25 行
<html> <head> <title>设定物件 GetFocus</title> </head> <BODY BACKGROUND="" BGCOLOR="white" TEXT="black" LINK="blue" VLINK="#808080" ALINK="red"> <center> <h1>设定物件 GetFocus</h1> </center><HR><p>Posted by <a href="mailto:shien@wusne.net.tw">小贤</a> on November 16, 1997 at 02:46:31:<p>我的表单上有多种物件,我有设 Tag 属性,依要 Change Focus 的次序设定!<br>当Form_KeyDown 时我用 Me.Active.Tag 得知目前是那个物件 Focus<br> ^^^^^^<br> ( 好像有写错!)<br>但我要如何让下个物件 GetFocus 呢?<br>我目前是这样做 !<br>Form_KeyDown()<br>select case me.active.Tag<br> case "0"<br> text1(1).setfocus 'Tag="1"<br> case "1"<br> mask(0).setfocus 'Tag="2"<br> case "2"<br> Dbgrid.setfocus 'Tag="3"<br>end select<p>但是物件很多, 以我的方法每一个物件就要写一个 Case "" ,<br>请问有较好的方法吗? 可以用Me.Active 得知目前的物件,<br>那可用 Me.active 来设定 要 GetFocus 的物件吗?<br><p><a name="followups">Follow Ups:</a><br><ul><!--insert: 1288--><!--top: 1321--><li><a href="1321.html"><b>试看看 TabIndex 吧!</b></a> 小吴 <i>17:13:41 11/18/97</i>(<!--responses: 1321-->0)<ul><!--insert: 1321--></ul><!--end: 1321--></ul><!--end: 1288--><br><HR><p></body></html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?