Module Module1
    Dim x As Integer
    Public y As Integer
    Public dim z As Integer
    Sub Main()

    End Sub
End Module