Luego de tener el formulario, asignamos un nombre para cada control y como una buena costumbre es darle un nombre clave y facil para poder recordar a la hora de programar.
Ahora el código de dicha aplicación es así:
[sourcecode language="vb"]
Public Class Form1
'Esta aplicación muestra la diferencia entre una variable declarada con DIM
'y STATIC dentro de un proceso.
Private Sub btnIncremento_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnIncremento.Click
'Declarando variables
Dim a As Integer
Static b As Integer
'Incrementar en 1 cada variable
a = a + 1
b = b + 1
'Imprimir en los Label el valor de cada variable
lblA.Text = a
lblB.Text = b
End Sub
Private Sub btnSalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSalir.Click
Me.Close()
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub
End Class
[/sourcecode]
Como se darán cuenta al darle click al botón para incrementar las variables notarán que la variable "A" no se incrementa, siendo el caso contrario en la variable "B"que esta si se incrementa, esto sucede porque la variable "A" esta declarada con DIM, que permite reinicializar el valor de la variable cada vez que se ejecuta el procedimiento, a comparación de la variable "B", que esta almacena su valor asignado hasta que la aplicación termine.
Puedes descargar la aplicación desde AQUI
