Public Class Form1
Public Shared MiaVariabile As Integer

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
MiaVariabile = 3
End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MiaVariabile = 5
Console.WriteLine(MiaVariabile)
End Sub
End Class