详细分析VB.NET动态代码

学习VB.NET时，经常会遇到使用VB.NET动态代码问题，这里将介绍使用VB.NET动态代码问题的解决方法，在这里拿出来和大家分享一下。

创新互联于2013年成立，是专业互联网技术服务公司，拥有项目成都网站设计、成都做网站网站策划，项目实施与项目整合能力。我们以让每一个梦想脱颖而出为使命，1280元大连做网站,已为上家服务,为大连各地企业和个人服务,联系电话:13518219792

使用VB.NET动态代码

在运行时创建一个控件是在无法确定应用程序功能的时候采取的一种策略。但是动态创建控件并不适用于所有的情况。有些时候你必须建立可执行代码，虽然你的应用程序运行的目的是补偿不同极其之间的配置，不同用户的需求，不同的环境需求或是其他要求。当应用程序所运行的电脑不存在控件，那么通常是需要创建VB.NET动态代码的。

幸运的是，.NET为我们提供了一系列VB.NET动态代码选项。例如，你可以创建一个可执行的能独立运行的程序或是可以想运行中的程序加载一个DLL然后再执行。当你需要演示一个外部任务的时候可以使用选择可执行，如运行一种脚本——该DLL选项最适合扩大现有的应用程序功能。

你可以运行来自文件或内存的VB.NET动态代码。当你需要不止一次地运行代码时，可以使用文件。对代码的检查可以再次运行外部文件而不需要对其进行二次编译。当你需要多次演示任务的时候，如一个安装请求，那可以使用内存图像。

当然我们也可以更改源代码。例如，你可以使用字符串来建立需要在应用程序中直接使用的代码。如果你需要代码具有高度灵活性，且代码本身不是很长时，这一方法的优势就非常显著。也可以从文件里建立代码，就如同VS一样。这一方法最适用于相对稳定且不需要复杂编码的需求。第三种选择是使用 Documentation Object Model来创建代码并将其作为CodeDom树型结构的一个系列。该树型结构包括了CodeCormpileUnits.这就像是用DOM模式创建了一个XML文件。

使用动态创建代码的***方式是用示例来检查一下。例三展示了一个基本“Hello World”示例。该示例用源代码直接创建了代码因此你可以看到整个运行以及生成一个外部可执行文件的过程。

 
 
 
  
  
  Private Sub btnTest3_Click() Handles btnTest3.Click     
  
  
  ' Create a compiler.    
  
  
  Dim Comp As VBCodeProvider = New VBCodeProvider()    
  
  
  ' Define the parameters for the code you want to compile.    
  
  
  Dim Parms As CompilerParameters = New CompilerParameters)    
  
  
     
  
  
  ' We do want to create an executable, rather than a DLL.    
  
  
  Parms.GenerateExecutable = True   
  
  
  ' The compiler will create an output assembly called Output.    
  
  
  Parms.OutputAssembly = "Output"   
  
  
  ' The compiler won't treat warnings as errors.    
  
  
  Parms.TreatWarningsAsErrors = False   
  
  
  ' Add any assembly you want to reference.    
  
  
  Parms.ReferencedAssemblies.Add("System.Windows.Forms.dll")    
  
  
     
  
  
  ' Define the code you want to run.    
  
  
     
  
  
  Dim SampleCode As StringBuilder = New StringBuilder()    
  
  
     
  
  
  SampleCode.Append("Imports System.Windows.Forms" + vbCrLf)    
  
  
     
  
  
  SampleCode.Append("Module TestAssembly" + vbCrLf)    
  
  
     
  
  
  SampleCode.Append("Sub Main()" + vbCrLf)    
  
  
     
  
  
  SampleCode.Append("MessageBox.Show(" + Chr(34) + _    
  
  
  "Dynamically Created Code!" + _Chr(34) + ")" + vbCrLf)    
  
  
  SampleCode.Append("End Sub" + vbCrLf)    
  
  
  SampleCode.Append("End Module" + vbCrLf)    
  
  
  ' Define the code to run.    
  
  
  Dim Executable As CompilerResults = _   
  
  
  Comp.CompileAssemblyFromSource(Parms, SampleCode.ToString())    
  
  
  ' Display error messages if there are any.    
  
  
  If Executable.Errors.HasErrors Then    
  
  
  For Each Item As CompilerError In Executable.Errors    
  
  
  MessageBox.Show(Item.ErrorText)    
  
  
  Next    
  
  
  Else    
  
  
  ' If there aren't any error messages, start the    
  
  
  ' executable.    
  
  
  Process.Start("Output")    
  
  
  End If    
  
  
  End Sub

标题名称：详细分析VB.NET动态代码
分享地址：http://www.csdahua.cn/qtweb/news0/216850.html

网站建设、网络推广公司-快上网，是专注品牌与效果的网站制作，网络营销seo公司；服务项目有等

声明：本网站发布的内容（图片、视频和文字）以用户投稿、用户转载内容为主，如果涉及侵权请尽快告知，我们将会在第一时间删除。文章观点不代表本网站立场，如需处理请联系客服。电话：028-86922220；邮箱：631063699@qq.com。内容未经允许不得转载，或转载时需注明来源：快上网

成都快上网为您推荐相关内容