Как объявить глобальную переменную

Class Form1

Dim N As Integer

Dim N As Integer

Public N As Integer

Form1.N

Module Module1
    Dim a As String
    Public g As String
End Module

Friend N As Integer

Module Module1
    Public Sub Main()
    End Sub
 
    Friend Function FivePow(ByVal x As Double)
        Try
            Return x ^ 5
        Catch ex As Exception
            MsgBox(ex.ToString)
            Return 0
        End Try
    End Function
End Module

  Public Sub Main()
    End Sub

Public Class Form1
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub
    Public Sub Main()
        Dim N As Integer = 0
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim N As Integer
        Label1.Text = N + 1
    End Sub
End Class

Public Class Form1
 
    Public N As Integer = 0
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub
    Public Sub Main()
        
    End Sub
 
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim N As Integer
        Label1.Text = N + 1
    End Sub
End Class

Public Class Form1
    Friend N As Integer = 0
 
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Timer1.Start()
    End Sub
    
    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
           N += 1
          Label1.Text = N
    End Sub
End Class