Løbende opdatering af værdier

Du starter en tråd (evt. i form af time) som kører hver X. minut, henter data og opdaterer GUI via Invoke.

Her er et super simpelt eksempel som tæller et tal op hvert sekund (1000 millisekunder):

Imports System
Imports System.Threading

Public Class Form1
    Private done As Boolean
    Private Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click
        done = False
        Dim t As Thread = New Thread(AddressOf TextUpdateThread)
        t.Start()
    End Sub
    Private Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click
        done = True
    End Sub
    Private Sub TextUpdateThread()
        Dim i As Integer = 0
        While Not done
            i = i + 1
            If TextBox1.InvokeRequired Then
                TextBox1.Invoke(New TextUpdateHandler(AddressOf TextUpdate), New Object() {i})
            Else
                TextUpdate(i)
            End If
            Thread.Sleep(1000)
        End While
    End Sub
    Private Delegate Sub TextUpdateHandler(ByVal n As Integer)
    Private Sub TextUpdate(ByVal n As Integer)
        TextBox1.Text = n.ToString()
    End Sub
End Class

Tak for det - det ser fornuftigt ud, men jeg er lidt i tvivl om hvordan jeg skal lave det. Jeg ønsker principielt bare at den skal kalde en sub hver gang den har ventet et stykke tid.

Jeg kan ikke helt gennemskue måden du bruger invoke-funktionen, kan du eksemplificere hvordan man kunne gøre det, så den kalder en sub i stedet for at lægge et nummer til en textbox-værdi?

TextUpdateThread henter oplysninger via FTP og kalder TextBoxn.Invoke til at opdatere GUI med.

ok?

Ja, men kan jeg ikke opdatere GUI vha. my.application.doevents i stedet for?

Man kan ogsaa proeve at lave det som tager lang tid i event traaden (button click) og saa kalde Application.DoEvents hyppigt.
Men det er ikke nogen god ide. Der kan ske forskellige ting og sager.

Proev og google paa:
  applications doevents evil

Tak.