VB.Net Tutorial/Language Basics/namespace

class definition with namespace

namespace WinForms
       public class HelloWorld
               shared sub Main() 
                       System.Console.WriteLine("Hello World")
               end sub
       end class
end namespace

Hello World

Define your own namespace

Namespace MyNamespace
    Public Class Class2
    End Class
End Namespace
Namespace MyNamespace
    Public Class Class1
    End Class
End Namespace

Module mod1
    Sub main()
        Dim objClass2 As MyNamespace.Class2
        Dim objClass1 As MyNamespace.Class1
    End Sub
End Module

Use Namespace

Namespace MyApp.Info
    Module Main
        Sub Main()
            Dim objHW As New MyApp.Info.Utilities
            objHW.DisplayData()
        End Sub
    End Module
    Public Class Utilities
        "Run the application
        Public Sub DisplayData()
            Console.WriteLine(Environment.MachineName)
            Console.WriteLine(Environment.SystemDirectory)
            Console.WriteLine(Environment.GetLogicalDrives())
            Console.WriteLine(Environment.Version.ToString())
        End Sub
    End Class
End Namespace

vbex
C:\WINDOWS\system32
System.String[]
2.0.50727.42

Use namespace to remove the conflicts

Namespace Network
    Class Address
        Public IP As String
        Public DomainName As String
        Public Sub New(ByVal IPAddr As String, ByVal Domain As String)
            IP = IPAddr
            DomainName = Domain
        End Sub
        Public Sub ShowAddress()
            Console.WriteLine("IP: " & IP)
            Console.WriteLine("Domain: " & DomainName)
        End Sub
    End Class
End Namespace
Namespace Mailing
    Class Address
        Public Street As String
        Public City As String
        Public State As String
        Public Zip As String
        Public Sub New(ByVal Street As String, ByVal City As String, ByVal State As String, ByVal Zip As String)
            Me.Street = Street
            Me.City = City
            Me.State = State
            Me.Zip = Zip
        End Sub
        Public Sub ShowAddress()
            Console.WriteLine("Street: " & Street)
            Console.WriteLine("City: " & City)
            Console.WriteLine("State: " & State)
            Console.WriteLine("Zip: " & Zip)
        End Sub
    End Class
End Namespace
Module Module1
    Sub Main()
        Dim IP As New Network.Address("122.111.222.112", "www.SomeSite.ru")
        Dim address As New Mailing.Address("122 Main", _
          "Houston", "Texas", "77469")
        IP.ShowAddress()
        Console.WriteLine()
        address.ShowAddress()
    End Sub
End Module

IP: 122.111.222.112
Domain: www.SomeSite.ru
Street: 122 Main
City: Houston
State: Texas
Zip: 77469