📄 6322.html

📁 VB技巧问答10000例,是一个教程

💻 HTML

字号:

<html>
  <head>
    <title>插个花...为何不把其它Text先Enabled呢?</title>
  </head>
  <body bgcolor="#FFFFFF" vlink="#808080">
    <center>
      <h1>插个花...为何不把其它Text先Enabled呢?</h1>
    </center>
<hr size=7 width=75%>

<hr size=7 width=75%><p>
Posted by <a href="mailto:Lai@ms3.url.com.tw">Sam</a> on October 08, 1998 at 08:58:37:<p>
In Reply to: <a href="5929.html">问一个textbox所导至无穷回圈的问题</a> posted by 小马 on September 23, 1998 at 15:51:39:<p>
: 请问一下今天我如果在form上布置了两个textbox,程式码如下所列:<br>抱歉啊 ,小弟的浅见是 ,既然此栏位不输正确就不给跳离<br>,那就在这栏位还没输入正确时把其他栏位都<br>Enabled=False不就得了吗?<br>(在此栏位的KeyDown事件做检查,正确了这个栏位就<br>Enabled=False ,再把下个栏位Setfocus and<br>Enabled=True )<p>: Private Sub Text1_LostFocus()<br>:   MsgBox "text1 LOSTFOCUS"<br>:   Text1.SetFocus<br>: End Sub<p>: Private Sub Text2_LostFocus()<br>:    MsgBox "text2 LOSTFOCUS"<br>:    Text2.SetFocus<br>: End Sub<p><br>: 当程式执行后,原本focus在textbox1,当我点选textbox2时,理所当然会触发textbox1的lostfocus事件,但此时程式的执行结果是会不断出现text1 lostfocus, text2 lostfocus之msgbox造成无穷回圈,为什么这两个textbox的lostfocus事件会一起触发呢?<br>: 之所以这样做是为了让user如果资料输入错误时不让其跳离当时的栏位,请各<br>: 位先进不吝指导,谢谢!!<br>: P.S.我的环境是win95 + vb6.0 sp3<p><br>
<br>
<br><hr size=7 width=75%><p>
<a name="followups">Follow Ups:</a><br>
<ul><!--insert: 6322-->
</ul><!--end: 6322-->
<br><hr size=7 width=75%><p>

</body></html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -