Operación no válida a través de subprocesos: Se tuvo acceso al control 'ListBox1' desde un subproceso distinto a aquel en que lo creó.
En el formulario solo tengo 1 Listbox, 1 Textbox y 1 boton para iniciar la ejecución.
Y el código es el siguiente...
Código:
Imports System.Threading PublicClass Form1 Private oHilo As Thread PrivateSub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Me.oHilo = New Thread(New ThreadStart(AddressOfMe.RellenaLista)) Me.oHilo.Start() EndSub PrivateSub RellenaLista() Dim icontador, iCuentaBis AsInteger Me.ListBox1.Items.Clear() For ico = 0 To 10000 Me.ListBox1.Items.Add("Contador: " & icontador) For iCu = 1 To 50000 'Retardo... Next Next 'Finalizamos la hebra... Me.oHilo.Abort() EndSub EndClass
Muchas gracias por vuestra ayuda!!!