Mega Code Archive

 

Categories / VB.Net by API / System Reflection

 

AppDomain CurrentDomain

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