Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustiť Visual Basic a vytvoriť nový projekt typu projektu formuláre systému Windows .
2
Urobte prvý riadok súboru kód : Spojené
" Dovoz System.Threading "
A pridajte :
" Dim t ako tému "
na hlavnej triede vo forme .
3
Pridanie tlačidla do formulára a zmeniť jej názov na " btnStart . " Zmeňte vlastnosť text tlačidla na " Spustiť proces na pozadí . "
4
Pridajte nasledujúci kód " btnStart " kliknite na akciu :
Private Sub btnStart_Click ( byval sender ako System.Object , byval e ako System.EventArgs ) Kľuky btnStart.Click klipart
t = new Thread ( AddressOf Me.BackgroundProcess )
t.Priority = ThreadPriority.BelowNormal " To bude tlačiť podprogram ešte ďalej do pozadia
t.Start ( )
End Sub
Táto rutina spustí proces na pozadí a dať mu nižšia ako normálne prioritou , takže to bude fungovať trochu . pomalšie a nie je v rozpore s prvkami používateľského rozhrania
5
Pridať podprogram má byť spustený na pozadí :
Private Sub BackgroundProcess ( )
" do dlhý proces tu, nie len nekonečné slučky
Ešte je síce pravda
Loop
End Sub
6
dôkladnosťou , pridajte nasledujúci kód do formulára spôsob uzatvárania :
Private Sub Form1_FormClosing ( byVal sender As Object , byval e ako System.Windows.Forms.FormClosingEventArgs ) Kľuky Me.FormClosing
t.Abort ( )
End Sub
Bez tejto rutiny , sa program neukončí normálne , pretože vlákno bude stále v prevádzke .
7
spustite program a kliknite na jediný tlačidlá na formulári . Tým sa spustí proces , ktorý je spustený na pozadí .