Alternativ til DoEvents, da denne ikke virker

[Degeim]

Jeg har en selvlaget funksjon som ligger i en selvlaget klasse som ligger i et selvlaget namespace, noenlunde slik:

 

Namespace Navn
Class Klasse
Function Sjekk()
DoEvents
End Function
End Class
End Namespace

 

Og problemet er at (jeg går ut fra at det er fordi jeg er inne i et hjemmelaget namespace) DoEvents'en ikke virker. Det vil si, den eksisterer ikke.

 

I vanlige situasjoner skriver jeg My.Application., og finne DoEvents i listen over ting som finnes i namespacet My.Application. Men i dette tilfellet ligger den ikke i listen.

 

Så derfor; hvordan kan jeg få den frem, evt finne et alternativ til DoEvents? Det er nemlig essensielt at formen på denne tråden holder seg oppdatert selv om en anne tråd arbeider.

 

Kanskje gjør jeg threadingen feil, så jeg viser hvordan jeg gjør det også:

Public Function ListDirectory(Optional ByVal directory As String = "") As List(Of String)
           'Utfør oppgåva på ein anna tråd
           _directory = directory
           Dim t As New Threading.Thread(AddressOf tListDirectory)
           t.Start()

           Do While t.IsAlive
               'TODO: DoEvents
               'Her er det essensielt at denne trådens form holder seg oppdatert
           Loop

           Return _list
       End Function

 

Jeg vet jeg kan bruke t.Join(), men det ser ut som om hele tråden stopper helt opp mens den venter på t da, i stedet for å DoEventse hele tiden.

 

Så; forslag?

 

 

Takk,

Degeim

[GeirGrusom]

System.Windows.Forms.Application.DoEvents()

[Degeim]

System er der, men Windows er ikke i System-namespacet.

[wolf5]

"Add References" :-)

[Degeim]

 

Dumt av meg (det pleier jo ikke være nødvendig, men jeg burde tenkt på det)

 

Takk!

Endret 27. oktober 2006 av Degeim