Fråga : ställa in en bakgrundsarbetare med en frånslagningstid netto 2.0

Jag har a-för/därefter att kretsa och skulle något liknande till uppsättningen som den kör upp till en fungera i bakgrunden.  Jag behöver också denna fungerar för att ha frånslagningstid, efter 5 har understött och går en värdera tillbaka, om den missade.  I funderare I önskar precis att begränsa den till en tråd, men styrkanågot liknande för att ha den att köra mer sistnämnd multipeltrådar.  Något exempel på hur till uppsättningen detta skulle upp, är great. " klar "

Svar : ställa in en bakgrundsarbetare med en frånslagningstid netto 2.0

Jag såg kodifiera, och som synes omvandlingen bearbetar fungerar inte.  VB-syntaxen för att skapa trådar och händelseförlagehanterare är ganska olik än C#.  Jag skrivev om den i VB, och denna bör fungera, den villiga guden.  Jag har testat den i en VB-kompilator också i visuellt hjälpmedelstudion för sammanställningfel, och det finns inga.

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:

Importer System.Threading

Enhet Module1

    Klassificera SampleClass

        Privat backgroundThread som tråden

        Privata underStartBackgroundThread ()
            backgroundThread = ny tråd (nya ParameterizedThreadStart (AddressOf DoWork)) '***************** ser inte suben till dowork

            backgroundThread.IsBackground = True
            'tidmätaren som aborterar tråden efter 5, understöder
            Den dunkla tidmätaren som ny System.Timers.Timer (5000) '5 understöder

            AddHandler tidmätare. Förfluten AddressOf timer_Elapsed

            '*********** har inte elapse som ett alternativ.  Också ser inte den timer_elapsed suben

            'starta tråden då starta tidmätaren
            backgroundThread.Start ()
            tidmätare. Starta ()
        Avsluta suben  'avslutar fungerar StartBackgroundThread

        'tidmätaren som avfyras efter 5, understöder fungerar
        Privat timer_Elapsed under (den ByVal avsändaren som anmärker, ByVal e som System.Timers.ElapsedEventArgs)
            Försök
                Om backgroundThread IsNot ingenting därefter   '*********** backgroundTimer inte definieras
                    ********* backgroundTimer för backgroundThread.Abort             () 'definieras inte
                Avsluta om
            Fånga
            Avsluta försök
        Avsluta under  'avslutar tidmätaren fungerar

        'fungera fungerar
        Privata underDoWork (statliga ByVal som anmärker)

            Försök
                'fungera här              
            Fånga e som System.Threading.ThreadAbortException
                'behandla tidmätaren som här förfallas
            Avsluta försök
        Avsluta suben
    Avsluta klassificerar

    Sub huvudsakligt ()

    Avsluta suben
Avsluta enheten
Andra lösningar  
 
programming4us programming4us