VB.Net Tutorial/Development/AppDomain

Create AppDomain and Unload AppDomain

Imports System.Reflection
Public Class Tester
    Public Shared Sub Main
    
        Dim myAppDomain As AppDomain
        Try
            myAppDomain = AppDomain.CreateDomain("YourDomain")
            Console.WriteLine(myAppDomain.FriendlyName)
            AppDomain.Unload(myAppDomain)
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try
    End Sub
End Class

YourDomain

CurrentDomain.BaseDirectory()

public class Test
   public Shared Sub Main
        Console.WriteLine(System.AppDomain.CurrentDomain.BaseDirectory())
   End Sub
End Class

C:\Java_Dev\WEB\dev\VB\

Get all assemblies in a domain

Imports System.Reflection
Public Class Tester
    Public Shared Sub Main
    
        Dim myCurrentAppDomain As AppDomain
        Dim myAssemblies() As [Assembly]
        Dim myAssembly As [Assembly]
        Try
            myCurrentAppDomain = AppDomain.CurrentDomain
            myAssemblies = myCurrentAppDomain.GetAssemblies
            For Each myAssembly In myAssemblies
                Console.WriteLine(myAssembly.FullName)
            Next
            Console.WriteLine(myCurrentAppDomain.FriendlyName)
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

    End Sub
End Class

mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
main, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null
Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
main.exe

Get current Domain

Imports System.Reflection
Public Class Tester
    Public Shared Sub Main
    
        Dim myCurrentAppDomain As AppDomain
        Dim myAssemblies() As [Assembly]
        Dim myAssembly As [Assembly]
        Try
            myCurrentAppDomain = AppDomain.CurrentDomain
            myAssemblies = myCurrentAppDomain.GetAssemblies
            For Each myAssembly In myAssemblies
                Console.WriteLine(myAssembly.FullName)
            Next
            Console.WriteLine(myCurrentAppDomain.FriendlyName)
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

    End Sub
End Class

mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
main, Version=0.0.0.0, Culture=neutral, PublicKeyToken=null
Microsoft.VisualBasic, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a
System, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089
main.exe