threads

javier.flores wrote:

hola gente, estoy necesitando hacer una clase que corra en un hilo,
pero no se como :S , el tema es que no necesito hacer correr una
funcion en un hilo, sino un objeto, como lo hace java con sus objetos
heredados de "Runnable" saludos

La funcion que es punto de entrada del hilo puede residir en cualquier clase
no solo en la clase que inicia el hilo. Por ejemplo:

Class TestThread

Private _nombre As String

Sub New(ByVal nombre As String)
_nombre = Nombre
End Sub

Public Sub Run()
MessageBox.Show(String.Format("Nombre: {0} - Thread: {1}", _
_nombre, Threading.Thread.CurrentThread.Name))
End Sub

End Class

Dim thread As New Threading.Thread(AddressOf (New TestThread("Mi
Nombre")).Run)
thread.Name = "Prueba"
thread.Start()

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo

mil gracias!!
saludos

Javier

"Eduardo A. Morcillo [MS MVP VB]" <emorcilloATmvps.org> escribió en el
mensaje news:

javier.flores wrote:
> hola gente, estoy necesitando hacer una clase que corra en un hilo,
> pero no se como :S , el tema es que no necesito hacer correr una
> funcion en un hilo, sino un objeto, como lo hace java con sus objetos
> heredados de "Runnable" saludos

La funcion que es punto de entrada del hilo puede residir en cualquier

clase

no solo en la clase que inicia el hilo. Por ejemplo:

Class TestThread

Private _nombre As String

Sub New(ByVal nombre As String)
_nombre = Nombre
End Sub

Public Sub Run()
MessageBox.Show(String.Format("Nombre: {0} - Thread: {1}", _
_nombre, Threading.Thread.CurrentThread.Name))
End Sub

End Class

Dim thread As New Threading.Thread(AddressOf (New TestThread("Mi
Nombre")).Run)
thread.Name = "Prueba"
thread.Start()

Eduardo A. Morcillo [MS MVP VB]
http://www.mvps.org/emorcillo