imports System
imports System.Web

public class Miaclasse
  public sub Scrivi(frase as string)
    HttpContext.Current.Response.Write(frase)
  end sub
end class

<%@ Page language="VB" %>
<%@ Import namespace="System.Reflection" %>
<%@ Import namespace="System.CodeDom.Compiler" %>
<%@ Import namespace="Microsoft.VisualBasic" %>
<script runat="server">

sub Page_Load()

  Response.Write("Inizio compilazione ed esecuzione codice...<br />")

  ' dichiarazione classi per la compilazione di una classe per il web
  dim comp as ICodeCompiler = new VBCodeProvider().CreateCompiler()
  dim cp as new CompilerParameters()
  cp.ReferencedAssemblies.Add("system.dll")
  cp.ReferencedAssemblies.Add("system.Web.dll")
  cp.GenerateExecutable = false
  cp.GenerateInMemory = true

  ' codice che sarà compilato
  dim codice as string = "imports System" + vbCrLf + _
                         "imports System.Web" + vbCrLf + _
                         "public class Miaclasse" + vbCrLf + _
                         "  public sub Scrivi(frase as string)" + vbCrLf + _
                         "    HttpContext.Current.Response.Write(frase)" + _
                         vbCrLf + "end sub" + vbCrLf + "end class"

  dim cr as CompilerResults = comp.CompileAssemblyFromSource(cp, codice)

  ' in caso di errore di compilazione viene visualizzato l'elenco degli errori
  if cr.Errors.HasErrors then
    dim errore as string=String.Empty
    errore+="Error Compiling Expression:<br /> "

    for each err as CompilerError in cr.Errors
      errore+=err.ErrorText+"<br />"
    next
    Response.Write("Errore nella compilazione: " + errore)
  else
    ' Altrimenti viene eseguito il codice con la funzione presente.

    dim a as System.Reflection.Assembly
    a = cr.CompiledAssembly
    dim compilato as object = a.CreateInstance("Miaclasse")
    dim mi as MethodInfo = compilato.GetType().GetMethod("Scrivi")
    mi.Invoke(compilato, new object() {DateTime.Now.ToString()})
  end if

  Response.Write("<br />Fine elaborazione codice")
end sub

</script>

comp=new VBCodeProvider().CreateCompiler()

comp = new CSharpCodeProvider().CreateCompiler()