[VB6 ] textbox互相轉換問題

[foreverwhat (奇)]

各位好

想請問一下
我現在有兩個textbox 分別為 textbox1 及 textbox2

我的想法是要兩個textbox的值互相轉換

像是textbox1.text = textbox2.text * 2
    textbox2.text = textbox1.text / 2

在 textbox2輸入 2  textbox1會自己帶出1

在TextBox1.TextChanged
輸入 if not textbox1.text = "" then textbox2.text = textbox1.text / 2

在TextBox2.TextChanged
輸入 if not textbox2.text = "" then textbox1.text = textbox2.text * 2

現在有一個問題是
我在textbox1輸入了值 textbox2就會有值出現了
但是textbox1在輸入的同時 textbox2值也在變化 所以複合 textchanged的條件

這樣兩邊都同時在變化好像類似打架的意思
想請問有辦法說 我的游標是在textbox1輸入 那就是textbox2做變化
textbox1 不會因為textbox2在變 就觸發textchanged的方式嗎

謝謝

--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 211.75.190.163
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1505353504.A.C20.html
→ sosokill: 加上focus判斷
我有想過加上focus判斷
但是VB6 我只有看到 textbox1.setfocus  沒有看到textbox1.focus
這個應該是強制textbox1被focus而不能拿來判斷(?
※ 編輯: foreverwhat (211.75.190.163), 09/14/2017 16:53:26
→ MOONRAKER: 搜尋vb6 textbox check focus就有一堆
→ sosokill: 樓上正解
推 unfinish: 個人會用KeyDown事件 然後用ENTER(KeyCode=13)觸發 填值
→ unfinish: 之後按ENTER才開始計算並將值送到另一個TB裡 用focus的
→ unfinish: 話 程式執行起來應該會卡卡的很怪吧
推 vincent0926: 執行前可用ActiveControl.Name去判斷當前控制項名稱