回答編集履歴

1

サンプルコードの修正 & 追記

2018/02/02 01:16

投稿

hatena19
hatena19

スコア33740

test CHANGED
@@ -18,7 +18,7 @@
18
18
 
19
19
 
20
20
 
21
- '変換処理
21
+ TextBox1.Value = 変換処理(TextBox1.Value)
22
22
 
23
23
  '検索処理
24
24
 
@@ -31,3 +31,77 @@
31
31
 
32
32
 
33
33
  ```
34
+
35
+ 追記
36
+
37
+ ---
38
+
39
+ h.horikoshiさんの回答もみて、確かにこの方法もありかなと思いました。
40
+
41
+
42
+
43
+ グローバル変数が必要ないのはメリットですね。
44
+
45
+ 変換処理が2回発生するのがちょっと無駄かな。
46
+
47
+
48
+
49
+ 処理の流れを図示してみました。
50
+
51
+
52
+
53
+ h.horikoshiさんの方法
54
+
55
+ ```text
56
+
57
+ Changイベント発生
58
+
59
+
60
+
61
+ *変換処理*
62
+
63
+
64
+
65
+ Valueに代入→ Changイベント再発生
66
+
67
+         ↓
68
+
69
+        *変換処理*
70
+
71
+         ↓
72
+
73
+        変換前 = 変換後なら検索処理
74
+
75
+         ↓
76
+
77
+ イベント終了← 再入イベント終了
78
+
79
+ ```
80
+
81
+ 私の方法
82
+
83
+ ```text
84
+
85
+ Changイベント発生
86
+
87
+
88
+
89
+ フラグをTrue設定
90
+
91
+
92
+
93
+ *変換処理*
94
+
95
+
96
+
97
+ Valueに代入→ Changイベント再発生
98
+
99
+         ↓
100
+
101
+ 検索処理 ← フラグTureならExit Sub
102
+
103
+
104
+
105
+ イベント終了
106
+
107
+ ```