Roboard + XPE 跑thread會當

miaoichi

最近用xpe跑我寫的vb.net，裡面跑一個thread然後就會當機~~~
不知有沒有解?

1. 
   
2.     Private engineThread As Thread
   
3.     Private Sub RunIKEngine()
   
4.         Dim a As Long = 0
   
5.         Do While True
   
6.             a += 1
   
7.             SetLabel4(a.ToString)
   
8.         Loop
   
9.     End Sub
   
10. 
    
11.     Private Sub StartThread()
    
12.         'Create a thread that will the RunHexEngine method in the background.
    
13.         engineThread = New Thread(AddressOf RunIKEngine)
    
14.         engineThread.IsBackground = True
    
15.         engineThread.Start()
    
16.     End Sub
    

複製代碼

miaoichi

1.     Delegate Sub SetTextBox1Callback(ByVal [text] As String)
   
2.     Private Sub SetLabel4(ByVal [text] As String)
   
3.         If Me.Label4.InvokeRequired Then
   
4.             Dim del As New SetTextBox1Callback(AddressOf SetLabel4)
   
5.             Me.Invoke(del, New Object() {[text]})
   
6.         Else
   
7.             Me.Label4.Text = [text]
   
8.         End If
   
9.     End Sub

複製代碼

miaoichi

謝謝m大，那我再試試看吧~~謝謝