Start een nieuwe Windows Form Application -project in Visual Basic . nET waardoor het een geschikte naam , zoiets als " VB Thread voorbeeld . " Dit zal een nieuwe aanvraag voor u maken met een hoofd formulier .

Schakelaar 2 om de code achter voor de belangrijkste vorm en voeg " Invoer System.Threading "

aan de top . Dit importeert de " . Net" namespace nodig is voor het werken met draden .
3

Maak de routine die de draad taak zal zijn . Hier is een eenvoudig voorbeeld dat gewoon telt 0-10.000 :

Public Sub LongProcess ( ) op

Dim Index
als Geheel

Index = 0 Om 10.000

Application.DoEvents ( )

Volgende

MsgBox ( " Thread Completed " ) op Twitter

End Sub

Dit zal op de lange lopende proces te simuleren. Lange berekeningen voor langzaam databank gesprekken zou zijn goede kandidaten te omsluiten in een routine die vervolgens kunnen worden geregen
4

Voeg een knop om de vorm en in zijn click handler start de taak : .

Dim t Zoals Thread

t = Nieuwe Draad ( AddressOf LongProcess )

t.Start ( ) op

MsgBox
( " Program Completed " ) op Twitter

Neem vooral kennis van de plaatsing van de MsgBox opdrachten . Sequentiële programmering zou impliceren dat de " Thread Completed " zou de eerste boodschap doos te verschijnen te zijn . Zoals u zien wanneer het programma wordt uitgevoerd , is dit niet het geval is .
5

Voer het " VB Thread Voorbeeld " -programma en klik op de knop op het formulier . Merk op dat de " Program Completed " boodschap verschijnt eerst . Dit komt omdat het programma " voortgebracht " de draad die nog steeds werkt , wanneer het klaar is het een boodschap verschijnt . Maak de teller hoger gaan om deze vertraging te verhogen .