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 + -
显示快捷键?