タイマーがまだ私はVB6のコードだ形

Question

アンロードした後に実行されている：アンロード形式と10秒間隔の後

If KeyCode = vbKeyEscape Then 
     i = MsgBox("you want to quit?", 4) 
     If i = 6 Then 
      Timer1.Enabled = False 
      Unload Me 
     End If 
End If 

を、タイマーイベントがまだ実行されてしまいました。 このコードはメインフォームの他に別の形式です。

Answer 1

フォームをアンロードした後にタイマーが起動した場合は、何かがフォームをリロードする原因になっています。または、フォームが2つロードされています。

最初のケースでは、イベントにブレークポイントを追加し、アンロードコードを1回踏んで何がトリガーされているかを確認してください。

2番目のケースでは、フォームの暗黙的な "ゲーム"グローバル参照を使用することを確認してください。また、明示的なローカル参照を使用してロードされたフォームを保持してください。私は暗黙のグローバル参照を使用してあなたのまだ期待しています。

Answer 2

親フォームがアンロードされた後に起動するタイマーは、VB6でよく発生する問題です。フォームをアンロードするVB6コードの実行中に、WM_TIMERメッセージを送出できます。これにより、イベントが遅くになってしまいます。フォームレベルでプライベートブールmbIsLoadedを宣言します。 に、FalseにForm_Unloadを割り当ててください。タイマーイベントハンドラでこれをコードの最初の行にします：If mbIsLoaded Then Exit Sub。