本文整理汇总了VB.NET中System.AppDomainSetup.ApplicationName属性的典型用法代码示例。如果您正苦于以下问题：VB.NET AppDomainSetup.ApplicationName属性的具体用法？VB.NET AppDomainSetup.ApplicationName怎么用？VB.NET AppDomainSetup.ApplicationName使用的例子？那么恭喜您, 这里精选的属性代码示例或许可以为您提供帮助。
在下文中一共展示了AppDomainSetup.ApplicationName属性的1个代码示例，这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞，您的评价将有助于系统推荐出更棒的VB.NET代码示例。
示例1: ADMultiDomain
' 导入命名空间
Imports System.Reflection
Imports System.Security.Policy
'Imports System.Data
'for evidence object
Class ADMultiDomain
' The following attribute indicates to loader that multiple application
' domains are used in this application.
<LoaderOptimizationAttribute(LoaderOptimization.MultiDomainHost)> _
Public Shared Sub Main()
' Create application domain setup information for new application domain.
Dim domaininfo As New AppDomainSetup()
domaininfo.ApplicationBase = System.Environment.CurrentDirectory
domaininfo.ApplicationName = "MyMultiDomain Application"
'Create evidence for the new appdomain from evidence of current application domain.
Dim adevidence As Evidence = AppDomain.CurrentDomain.Evidence
' Create appdomain.
Dim newDomain As AppDomain = AppDomain.CreateDomain("MyMultiDomain", adevidence, domaininfo)
'Load an assembly into the new application domain.
Dim w As Worker = CType( _
newDomain.CreateInstanceAndUnwrap(
GetType(Worker).Assembly().GetName().Name, "Worker"),
Worker)
w.TestLoad()
'Unload the application domain, which also unloads the assembly.
AppDomain.Unload(newDomain)
End Sub
End Class
Class Worker
Inherits MarshalByRefObject
Friend Sub TestLoad()
' You must supply a valid assembly display name here.
[Assembly].Load("Text assembly name, Culture, PublicKeyToken, Version")
For Each assem As [Assembly] In AppDomain.CurrentDomain.GetAssemblies()
Console.WriteLine(assem.FullName)
Next
End Sub
End Class