複数のスレッドを使用していくつかのプロセスを実行していますが、進行状況の合計をプログレスバーに表示したいので、安全な方法で ProgressBar1.Increment(1) を実行するにはどうすればよいですか?
Public Sub thread1process()
For i = 0 To t1.Rows.Count - 1
t1.Rows(i)("cname") = "Thread1"
t1.Rows(i)("PD") = i
t1.Rows(i)("PDP") = i
t1.Rows(i)("TPD") = i
t1.Rows(i)("TPDP") = i
ProgressBar1.Increment(1)
Next
End Sub
Public Sub thread2process()
For i = 0 To t2.Rows.Count - 1
t2.Rows(i)("cname") = "Thread2"
t2.Rows(i)("PD") = i
t2.Rows(i)("PDP") = i
t2.Rows(i)("TPD") = i
t2.Rows(i)("TPDP") = i
ProgressBar1.Increment(1)
Next
End Sub
また、同時に複数のスレッドからパブリック変数を増やすにはどうすればよいですか?