回答編集履歴

2

typo修正

2019/06/27 06:27

投稿

y_waiwai
y_waiwai

スコア88163

test CHANGED
@@ -8,7 +8,7 @@
8
8
 
9
9
  なら、
10
10
 
11
- 処理中のフラグをリセットする前に、DoEvent関数を実行すればいいかと。
11
+ 処理中のフラグをリセットする前に、DoEvents関数を実行すればいいかと。
12
12
 
13
13
 
14
14
 

1

回答に追記

2019/06/27 06:27

投稿

y_waiwai
y_waiwai

スコア88163

test CHANGED
@@ -1 +1,23 @@
1
1
  処理中のフラグを用意しといて、そのフラグが立ってるときはボタンの処理をスルーするようにすればいいのでは
2
+
3
+
4
+
5
+ ---
6
+
7
+ って、メッセージが残ってるということなのね。
8
+
9
+ なら、
10
+
11
+ 処理中のフラグをリセットする前に、DoEvent関数を実行すればいいかと。
12
+
13
+
14
+
15
+
16
+
17
+ ' 処理を抜ける前にフラグを落とす
18
+
19
+ DoEvents()
20
+
21
+ blnJikko = False
22
+
23
+ End Sub