Cómo generar un evento en Visual Basic

Escrito por laura gittins | Traducido por juliana star
  • Comparte
  • Twittea
  • Comparte
  • Pin
  • E-mail
Cómo generar un evento en Visual Basic
Cómo generar un evento en Visual Basic. (Ablestock.com/AbleStock.com/Getty Images)

En la programación de computadoras, generar un evento significa llamar a una función para anunciar que algo ha ocurrido. Puedes generar eventos en Visual Basic usando la instrucción "RaiseEvent". Para generar cualquier evento primero debes declarar su fuente a nivel de módulo de la clase, módulo o estructura en la que quieras usarlo. A partir de ahí puedes generar el evento desde cualquier parte que se encuentre dentro de la misma fuente de eventos de su declaración. Además, usa una variable u objeto "WithEvents" para controlar los eventos generados.

Otras personas están leyendo

Instrucciones

  1. 1

    Abre Visual Basic e inicia un nuevo proyecto de aplicación con formularios. Haz doble clic en el control "Button" para añadirlo a tu formulario. Haz doble clic en el control "Label" para agregarlo también a tu formulario.

  2. 2

    Presiona "F7" para abrir la ventana de código. Escribe lo siguiente para declarar una nueva clase y crear elementos a nivel de clase:

    Public Class MyEvent

    Private clicks As Short = 0 Private WithEvents gimmick As MyEvent Public Event AddClick()

    Cualquier evento invocado por la instrucción "RaiseEvent" debe ser declarado a nivel de clase y cualquier objeto que controle un evento debe usar la instrucción "WithEvents".

  3. 3

    Escribe lo siguiente en el procedimiento sub "Form1_Load":

    myObject = New MyEvent

    Esto crea un objeto de la clase "MyEvent".

  4. 4

    Escribe lo siguiente para crear un nuevo procedimiento sub:

    Public Sub Clicked() RaiseEvent AddClick() End Sub

    Al invocarla, esta función genera el evento AddClick que declaraste a nivel de clase.

  5. 5

    Escribe lo siguiente para crear un procedimiento sub que controle el evento:

    Private Sub Display() Handles myObject.AddClick Label1.Text = "Times you have clicked: " & clicks End Sub

    Cuando sea generado el evento "AddClick", el código del sub actualizará el texto en Label1.

  6. 6

    Escribe lo siguiente para controlar el evento click del botón:

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click clicks += 1 myObject.Clicked() End Sub

    Cuando el usuario hace clic en el botón, la variable "clicks" incrementa en uno y el objeto invoca a la función "Clicked", que genera un evento.

No dejes de ver

Filtrar por:
  • Mostrar todos
  • Artículos
  • Galerías de fotos
  • Videos
Ordenar:
  • Más relevante
  • Más popular
  • Más reciente

No se encuentran artículos disponibles

No se encuentran slideshows disponibles

No se encuentran videos disponibles