スレッドを使用して、時間のかかる操作 (for ループ) の実行中に進行状況ウィンドウを表示しています。その操作の後、スレッドを停止したいのですが、メソッド " ShowProgressDialog " が呼び出されていません。正常に動作している他のイベント。以下はコードです。
Private Sub TSBRSToLoc_Click(sender As System.Object, e As System.EventArgs) Handles TSBRSToLoc.Click
Try
If Not BWRRStoLoc.IsBusy Then
Dim backgroundThred As New Thread(AddressOf ShowProgressDialog)
backgroundThred.IsBackground = True
'Dim formProgree As New ProgressForm
backgroundThred.Start()
DisableBtns(sender)
ProgressBarCompare.Value = 0
lblProgStatus.Text = ""
Dim filesSize As Long = 0
For index As Integer = 0 To ObjlsViewCompare.Items.Count - 1
Dim file As File = ObjlsViewCompare.GetModelObject(index)
If Not file.Status = MatchStatus.MisingOnRackSpace Then
filesSize = filesSize + file.SizeOnRackSpace
End If
Next
ProgressBarCompare.Maximum = filesSize
' formProgree.Close()
backgroundThred.Abort()
backgroundThred.Join()
BWRRStoLoc.RunWorkerAsync()
End If
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub