VB.net Effectuer la tâche à l'Heure prévue

j'ai besoin pour effectuer une tâche à un certain moment à l'aide de l'aide de l'utilisateur saisie des Heures et des Minutes.

Je suis en train de penser à quelque chose comme l'aide d'une sorte de boucle qui à chaque fois en boucle, vérifie si la Now().Hour correspond HourChoice et la Now().Minute correspond à la MinuteChoice

En cela, j'ai aussi une option utilisateur à choisi "AM" ou "PM", et si TimeOfDay = "PM", ajouter 12 heures (Le Now().Hour est l'heure militaire).

EDIT:je ne veux ce à exécuter une seule fois à un moment, pas tous les jours.

InformationsquelleAutor user2620851 | 2013-07-31
  1. 2

    Vous pouvez utiliser un System.Threading.Timer pour ce faire. Au lieu d'une boucle qui fonctionne en permanence et dort, vous pouvez définir l'intervalle de la Timer à la différence entre maintenant et le temps choisi et les TimerCallback à la Sub que la tâche de travail. Réglage de la temporisation à 0 ou Timeout.Infinite sera assurez-vous que ce n'est exécuté qu'une fois.

    EDIT: Exemple

    Dim tcb As TimerCallback = AddressOf DoStuff
Dim t As Timer
Dim execTime As TimeSpan
Dim dtNow As DateTime = DateTime.Now
Dim hc As Integer = HourChoice
Dim mc As Integer = MinuteChoice

If TimeOfDay = "AM" And hc = 12 Then
    hc = 0
Else If TimeOfDay = "PM" Then
    hc = hc + 12
End If

Dim dtCandidate As DateTime = New DateTime(dtNow.Year, dtNow.Month, dtNow.Day, hc, mc, 0)

If dtCandidate < dtNow Then
    dtCandidate.AddDays(1)
End If

execTime = dtCandidate.Subtract(dtNow)
t = New Timer(tcb,Nothing,execTime,TimeSpan.Zero)

    Ensuite, vous avez juste besoin d'un Sous pour faire vos tâches:

    Public Sub DoStuff(obj As Object)
'...Do Some Kind of Work
End Sub
    • Vous s'il vous plaît me donner un exemple?
    • Mis à jour avec exemple. Vous prie de l'excuser de mon VB je suis un peu rouillé...
    InformationsquelleAutor randcd
  2. 0

    Pas encore testé mais cela devrait fonctionner. Dans le laps de Temps vous pouvez définir les jours, les heures, les minutes, les secondes.

    Private timer As System.Threading.Timer = New System.Threading.Timer(AddressOf DoWhatever, Nothing, New TimeSpan(0, 10, 0, 0), -1)

Private Sub dowhatever(sender As Object, e As Timers.ElapsedEventArgs)
   ' Do stuff
End Sub

    Plus peut être trouvé sur MSDN

    InformationsquelleAutor David Sdot
  3. 0

    Vous n'avez pas à boucle,

    Il suffit d'ajouter un Timer pour votre formulaire, définissez son intervalle de 500 de sorte qu'il se déclenche toutes les 500 millisecondes.

    Activer via un Bouton pour démarrer votre Tâche.

    Ensuite sur votre Minuterie.Tique De L'Événement:

        Private Sub Timer1_Tick(sender As Object, e As EventArgs) Handles Timer1.Tick
       If Hour(Now) = HourChoice And Minute(Now) = MinuteChoice Then
            'Your Task Here
       End If
    End Sub
    • Je voudrais créer un Timer, et de définir sa graduation pour le temps d'attente en millisecondes. Lorsque la minuterie est appelé l'arrêt de la minuterie.
    • C'est une meilleure approche @DavidSdot
    • comment puis-je l'activer et régler la minuterie?
    • comment dois-je faire? Je n'ai jamais utilisé un timer
    • Une Minuterie est l'un de l'objet se trouvant sur votre boîte à outils (Comme un Bouton). Vous faites-la glisser vers votre formulaire pour ajouter, encore une fois, comme un Bouton.
    • pour calc les millisecondes utiliser qqch. comme (Date.Now - Date.Now.AddHours(2)).TotalMilliseconds
    • Après le violon google, il semble que la Minuterie d'Intervalle Propriété est plafonné à 64.8 secondes. Corrigez-moi si je suis mal.
    • N'est-ce pas 500 millisecondes et non pas de 5 ms??
    • Merci pour cette une.

    InformationsquelleAutor Ruben_PH
  4. 0

    Un peu tard pour ajouter une réponse à cette question, mais: Vous pouvez utiliser un Système standard.De Windows.Les formulaires.Minuterie. Définissez l'intervalle de la différence en millisecondes entre le temps et Maintenant(), puis démarrer la minuterie.

    InformationsquelleAutor Hank