Multi threads

Galera estou o usando o código abaixo mas estou tendo problemas com um dos componentes:

Imports System.Threading
Public Class principal

Private spy As Thread
Public Sub spylog()
Do
[b]Me.loglist.Items.Add("String qualquer")[/b]
Loop

End Sub

Private Sub principal_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
spy = New Thread(AddressOf spylog)

spy.IsBackground = True

spy.Start()
End Sub
End Class
Quando ele executa a instrução em negrito aparece o seguinte erro:

Cross-thread operation not valid: Control 'loglist' accessed from a thread other than the thread it was created on.

Alguem sabe como posso resolver isso?