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