Compartir a través de

Cómo: Ejecutar procedimientos en intervalos establecidos con el componente temporizador de Formularios Windows Forms

A veces, es posible que quiera crear un procedimiento que se ejecute en intervalos de tiempo específicos hasta que haya finalizado un bucle o que se ejecute cuando haya transcurrido un intervalo de tiempo establecido. El Timer componente hace posible este procedimiento.

Este componente está diseñado para un entorno de Windows Forms. Si necesita un temporizador adecuado para un entorno de servidor, consulte Introducción a los temporizadores de Server-Based.

Nota:

Hay algunas limitaciones al usar el Timer componente . Para obtener más información, vea Limitaciones de la propiedad Interval del componente temporizador de Windows Forms.

Para ejecutar un procedimiento a intervalos establecidos con el componente Timer

  1. Agregue un Timer elemento al formulario. Consulte la sección Ejemplo siguiente para obtener una ilustración de cómo hacerlo mediante programación. Visual Studio también admite la adición de componentes a un formulario. Vea también Cómo: Agregar controles sin una interfaz de usuario a formularios Windows Forms.

  2. Establezca la Interval propiedad (en milisegundos) para el temporizador. Esta propiedad determina cuánto tiempo pasará antes de que se vuelva a ejecutar el procedimiento.

    Nota:

    Cuanto más a menudo se produce un evento de temporizador, más tiempo de procesador se usa para responder al evento. Esto puede ralentizar el rendimiento general. No establezca un intervalo menor del que necesita.

  3. Escriba el código adecuado en el controlador de Tick eventos. El código que escriba en este evento se ejecutará en el intervalo especificado en la Interval propiedad .

  4. Establezca la Enabled propiedad en true para iniciar el temporizador. El Tick evento comenzará a producirse, ejecutando el procedimiento en el intervalo establecido.

  5. En el momento adecuado, establezca la Enabled propiedad en false para detener la ejecución del procedimiento de nuevo. Establecer el intervalo en 0 no hace que el temporizador se detenga.

Primer ejemplo de código

En este primer ejemplo de código se realiza un seguimiento de la hora del día en incrementos de un segundo. Usa un Button, un Labely un Timer componente en un formulario. La Interval propiedad se establece en 1000 (igual a un segundo). En el evento Tick, el título de la etiqueta se establece en la hora actual. Cuando se hace clic en el botón, la Enabled propiedad se establece falseen , lo que impide que el temporizador actualice el título de la etiqueta. El ejemplo de código siguiente requiere que tenga un formulario con un Button control denominado Button1, un Timer control denominado Timer1y un Label control denominado Label1.

Private Sub InitializeTimer()
   ' Run this procedure in an appropriate event.
   ' Set to 1 second.
   Timer1.Interval = 1000
   ' Enable timer.
   Timer1.Enabled = True
   Button1.Text = "Enabled"
End Sub
x
Private Sub Timer1_Tick(ByVal Sender As Object, ByVal e As EventArgs) Handles Timer1.Tick
' Set the caption to the current time.
   Label1.Text = DateTime.Now
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
      If Button1.Text = "Stop" Then
         Button1.Text = "Start"
         Timer1.Enabled = False
      Else
         Button1.Text = "Stop"
         Timer1.Enabled = True
      End If
End Sub

private void InitializeTimer()
{
    // Call this procedure when the application starts.
    // Set to 1 second.
    Timer1.Interval = 1000;
    Timer1.Tick += new EventHandler(Timer1_Tick);

    // Enable timer.
    Timer1.Enabled = true;

    Button1.Text = "Stop";
    Button1.Click += new EventHandler(Button1_Click);
}

private void Timer1_Tick(object Sender, EventArgs e)
{
   // Set the caption to the current time.
   Label1.Text = DateTime.Now.ToString();
}

private void Button1_Click(object sender, EventArgs e)
{
  if ( Button1.Text == "Stop" )
  {
    Button1.Text = "Start";
    Timer1.Enabled = false;
  }
  else
  {
    Button1.Text = "Stop";
    Timer1.Enabled = true;
  }
}

private:
   void InitializeTimer()
   {
      // Run this procedure in an appropriate event.
      // Set to 1 second.
      timer1->Interval = 1000;
      // Enable timer.
      timer1->Enabled = true;
      this->timer1->Tick += gcnew System::EventHandler(this,
                               &Form1::timer1_Tick);

      button1->Text = S"Stop";
      this->button1->Click += gcnew System::EventHandler(this,
                               &Form1::button1_Click);
   }

   void timer1_Tick(System::Object ^ sender,
      System::EventArgs ^ e)
   {
      // Set the caption to the current time.
      label1->Text = DateTime::Now.ToString();
   }

   void button1_Click(System::Object ^ sender,
      System::EventArgs ^ e)
   {
      if ( button1->Text == "Stop" )
      {
         button1->Text = "Start";
         timer1->Enabled = false;
      }
      else
      {
         button1->Text = "Stop";
         timer1->Enabled = true;
      }
   }

Segundo ejemplo de código

En este segundo ejemplo de código se ejecuta un procedimiento cada 600 milisegundos hasta que haya finalizado un bucle. El ejemplo de código siguiente requiere que tenga un formulario con un Button control denominado Button1, un Timer control denominado Timer1y un Label control denominado Label1.

' This variable will be the loop counter.
Private counter As Integer

Private Sub InitializeTimer()
   ' Run this procedure in an appropriate event.
   counter = 0
   Timer1.Interval = 600
   Timer1.Enabled = True
End Sub

Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
   If counter => 10 Then
      ' Exit loop code.
      Timer1.Enabled = False
      counter = 0
   Else
      ' Run your procedure here.
      ' Increment counter.
      counter = counter + 1
      Label1.Text = "Procedures Run: " & counter.ToString
   End If
End Sub

// This variable will be the loop counter.
private int counter;

private void InitializeTimer()
{
   // Run this procedure in an appropriate event.
   counter = 0;
   timer1.Interval = 600;
   timer1.Enabled = true;
   // Hook up timer's tick event handler.
   this.timer1.Tick += new System.EventHandler(this.timer1_Tick);
}

private void timer1_Tick(object sender, System.EventArgs e)
{
   if (counter >= 10)
   {
      // Exit loop code.
      timer1.Enabled = false;
      counter = 0;
   }
   else
   {
      // Run your procedure here.
      // Increment counter.
      counter = counter + 1;
      label1.Text = "Procedures Run: " + counter.ToString();
      }
}

private:
   int counter;

   void InitializeTimer()
   {
      // Run this procedure in an appropriate event.
      counter = 0;
      timer1->Interval = 600;
      timer1->Enabled = true;
      // Hook up timer's tick event handler.
      this->timer1->Tick += gcnew System::EventHandler(this, &Form1::timer1_Tick);
   }

   void timer1_Tick(System::Object ^ sender,
      System::EventArgs ^ e)
   {
      if (counter >= 10)
      {
         // Exit loop code.
         timer1->Enabled = false;
         counter = 0;
      }
      else
      {
         // Run your procedure here.
         // Increment counter.
         counter = counter + 1;
         label1->Text = String::Concat("Procedures Run: ",
            counter.ToString());
      }
   }

Consulte también