0

簡単な質問ですが、

一連のことをループするだけのクラスで実行されているスレッドがあります。ユーザーがフォームを閉じたときにスレッドを停止したい。Form.vbに次の関数があります

    Public Function getFormStatus() As Boolean
    Dim bAlive As Boolean = False

    If Me.Enabled = True Then
        bAlive = True
    Else
        bAlive = False
    End If

    Return bAlive
End Function

次に、メインループクラスで

dim isAlive as Boolean = false
isAlive = frm.getFormStatus
while isAlive
   do stuff

私の問題は、フォームが現在アクティブかどうかを示すフォームのプロパティがわからないことです! これは難しいことではないと思いますが、いくつかの異なるものを試しましたが、期待した結果が得られませんでした.

4

1 に答える 1