Programm unterbrechen. Timer?

Prozeduren alle x Minuten durchlaufen.

Hallo...
Ich bin realtiv neu in Sachen VB und hab auch nur Erfahrungen in VBA gemacht.

Ich habe mir nun Programm erstellt, das Daten aus einer Mysql-Tabelle holt.
Da es aber ständig laufen soll ist meine Frage wie ich bestimmte Prozeduren alle X Minuten durchlaufen kann..

Ich hab mir die Timer mal angesehen, habe aber nichts vernünftiges hinbekommen

MfG und Danke..

Please also mark the comments that contributed to the solution of the article

Content-Key: 43659

Url: https://administrator.de/contentid/43659

Printed on: April 24, 2024 at 03:04 o'clock

2 Comments

Latest comment

Hallo afri!

Hier ein Beispiel mit VB2005:

Form1 mit btnStart, btnStop und Timer1

Public Class Form1

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        MsgBox("Es ist wieder soweit!") 'oder eben Aufruf Deines Datensaugeprogramms  
    End Sub

    Private Sub btnStart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStart.Click
        Timer1.Enabled = True
        Timer1.Interval = 1000 * 20 'Angabe in ms --> 20 Sekunden  
        Timer1.Start()
    End Sub
    Private Sub btnStop_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnStop.Click
        Timer1.Stop()
    End Sub

End Class

Vergleichbar in VB 6.0:

Private Sub Timer1_Timer()
MsgBox "Es ist wieder soweit!"  
End Sub

Private Sub btnStart_Click()
Timer1.Interval = 1000 * 20
Timer1.Enabled = True
End Sub

Private Sub btnStop_Click()
Timer1.Enabled = False
End Sub

HTH
bastla

Hi!

Genau das habe ich gesucht! Großes Dankeschön!

geht nun alles

German solved Question VB for Applications Development

Hotly discussed

Check of ZFW Firewallgleixnerd - 5 Comments

Wireguard VPN on UDM Pro behind Fritzbox - Handshake did not completejstricker - 3 Comments

How to set up and configure a Linux GRE tunnelAlexWisha - 3 Comments