.NET Framework vystavuje tried, ktoré vám umožnia
programovanie prístupu Visual Basic.NET alebo Visual Basic 2005 jazyk kompilátor. By to mohlo
byť užitočné, ak chcete napísať vlastný kód zostavovaní utility. Toto
článok stanovuje vzorového kódu, ktorý umožňuje kompiláciu kódu z textu
Zdroj. Uplatňovanie vám umožňuje buď len vybudovať spustiteľný alebo budovať
spustiteľný a spustiť ho. Všetky chyby, ktoré sa vyskytnú počas procesu kompilácie
sa zobrazujú vo formulári.
Jazyka Visual Basic.NET jazyk kompilátor alebo jazyka Visual Basic Compiler Language 2005
Krok 2: Ako programovo kompiláciu kódu
.NET Framework poskytuje vykonanie kompilátor ICodeCompiler
rozhranie. VBCodeProvider triedu implementuje toto rozhranie a poskytuje prístup
na prípady Visual Basic kód generátor a kód kompilátor. The
Tieto vzorky vytvorí inštanciu VBCodeProvider a používa sa dostať
odkaz na ICodeCompiler rozhranie.
Dim codeProvider As New VBCodeProvider()
Dim icc As ICodeCompiler = codeProvider.CreateCompiler
Akonáhle budete mať odkaz na rozhranie ICodeCompiler, môžete
použiť na zostavenie zdrojový kód. Môžete prejsť parametre kompilátor prostredníctvom
pomocou CompilerParameters trieda. Tu je príklad:
Dim parameters As New CompilerParameters()
Dim results As CompilerResults
parameters.GenerateExecutable = True
parameters.OutputAssembly = Output
results = icc.CompileAssemblyFromSource(parameters, SourceText)
Vyššie uvedený kód používa CompilerParameters objekt povedať
kompilátor, ktoré chcete generovať spustiteľný súbor (v protiklade k knižnice DLL) a
chcete výstup výsledné zhromaždenie na disk. Volanie CompileAssemblyFromSource je, keď dostane zostavené vaše zhromaždenia. Táto metóda vaše
objekt parametre a zdrojový kód, ktorý je reťazec. Akonáhle ste zostaviť svoj
kód môžete skontrolovať, či tam boli žiadne chybami kompilácie. Používame
Vráti hodnotu z CompileAssemblyFromSource, ktorá je CompilerResults objekt. Tento objekt obsahuje chyby zbierku, ktorá obsahuje
všetky chyby, ktoré sa vyskytli počas skompilovať.
If results.Errors.Count > 0 Then
'There were compiler errors
Dim CompErr As CompilerError
For Each CompErr In results.Errors
textBox2.Text = textBox2.Text & _
"Line number " & CompErr.Line & _
", Error Number: " & CompErr.ErrorNumber & _
", '" & CompErr.ErrorText & ";" & _
Environment.NewLine & Environment.NewLine
Next
End If
Existujú iné možnosti pre zostavovanie, ako sú zostavovanie z
súbor. Môžete tiež dávkové skompilovať, čo znamená, môžete zostaviť viaceré súbory alebo
zdroje v rovnakom čase. Ďalšie informácie o týchto tried sú dostupné
na webovej lokalite MSDN Online:
Vytvoriť nové Visual Basic.NET alebo Visual Basic 2005 Windows aplikácie. Form1
vytvára sa predvolene.
V okne zobrazení kódu Form1 nahradiť všetky
existujúci text s nasledujúcim kódom:
Option Strict On
Imports System.CodeDom.Compiler
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
'Add any initialization after the InitializeComponent() call
End Sub
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
Friend WithEvents textBox1 As System.Windows.Forms.TextBox
Friend WithEvents button1 As System.Windows.Forms.Button
Friend WithEvents textBox2 As System.Windows.Forms.TextBox
Friend WithEvents button2 As System.Windows.Forms.Button
'Required by the Windows Form Designer
Private components As System.ComponentModel.Container
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.textBox2 = New System.Windows.Forms.TextBox()
Me.textBox1 = New System.Windows.Forms.TextBox()
Me.button1 = New System.Windows.Forms.Button()
Me.button2 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'textBox2
'
Me.textBox2.BackColor = System.Drawing.SystemColors.Control
Me.textBox2.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.textBox2.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.textBox2.ForeColor = System.Drawing.SystemColors.WindowText
Me.textBox2.Location = New System.Drawing.Point(264, 56)
Me.textBox2.Multiline = True
Me.textBox2.Name = "textBox2"
Me.textBox2.Size = New System.Drawing.Size(240, 232)
Me.textBox2.TabIndex = 2
Me.textBox2.Text = ""
'
'textBox1
'
Me.textBox1.Location = New System.Drawing.Point(16, 48)
Me.textBox1.Multiline = True
Me.textBox1.Name = "textBox1"
Me.textBox1.Size = New System.Drawing.Size(240, 240)
Me.textBox1.TabIndex = 0
Me.textBox1.Text = "textBox1"
'
'button1
'
Me.button1.Location = New System.Drawing.Point(368, 304)
Me.button1.Name = "button1"
Me.button1.TabIndex = 1
Me.button1.Text = "Build"
'
'button2
'
Me.button2.Location = New System.Drawing.Point(456, 304)
Me.button2.Name = "button2"
Me.button2.TabIndex = 1
Me.button2.Text = "Run"
'
'Form1
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(544, 333)
Me.Controls.AddRange(New System.Windows.Forms.Control() {Me.button2, Me.textBox1, Me.button1, Me.textBox2})
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False)
End Sub
#End Region
Private Sub button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles button1.Click, button2.Click
Dim codeProvider As New VBCodeProvider()
Dim icc As ICodeCompiler = codeProvider.CreateCompiler
Dim Output As String = "Out.exe"
Dim ButtonObject As Button = CType(sender, Button)
textBox2.Text = ""
Dim parameters As New CompilerParameters()
Dim results As CompilerResults
'Make sure we generate an EXE, not a DLL
parameters.GenerateExecutable = True
parameters.OutputAssembly = Output
results = icc.CompileAssemblyFromSource(parameters, textBox1.Text)
If results.Errors.Count > 0 Then
'There were compiler errors
textBox2.ForeColor = Color.Red
Dim CompErr As CompilerError
For Each CompErr In results.Errors
textBox2.Text = textBox2.Text & _
"Line number " & CompErr.Line & _
", Error Number: " & CompErr.ErrorNumber & _
", '" & CompErr.ErrorText & ";" & _
Environment.NewLine & Environment.NewLine
Next
Else
'Successful Compile
textBox2.ForeColor = Color.Blue
textBox2.Text = "Success!"
'If we clicked run then launch the EXE
If ButtonObject.Text = "Run" Then Process.Start(Output)
End If
End Sub
End Class
Poznámka Kód by zmeniť v roku 2005 jazyka Visual Basic. Ak vytvoríte nový formulár, ktorý sa nazýva Form1 v jazyku Visual Basic 2005, máte súbor Form1.vb pre váš kód a Form1.Designer.vb súbor, ktorý obsahuje automaticky generované časť. Windows Forms Designer používa čiastočné kľúčové slovo vykonávanie Form1 rozdeliť na dva samostatné súbory. To bráni vyžarovaného dizajnér kódu, aby boli roztrúsené s váš kód. Ďalšie informácie o vylepšení jazyka jazyka Visual Basic 2005, navštívte nasledovnú webovú lokalitu spoločnosti Microsoft:
Spustenie projektu. Po Form1 načíta, kliknite na tlačidlo Vybudovať tlačidlo. Všimnite si, že dostanete pár kompilátor
chyby.
Ďalej, skopírujte nasledujúci kód do textového, nahradenie
existujúci text:
Imports System
Module Module1
Sub Main()
Console.WriteLine("Hello World!")
Console.WriteLine("Press ENTER")
Console.ReadLine()
End Sub
End Module
Kliknite na tlačidlo Vybudovať znova. Skompilovať by mali byť úspešný.
Kliknite na tlačidlo Spustiť a bude zostavovať kód a spustiť výsledného spustiteľného súboru
súbor. Skompilovať vytvorí spustiteľný súbor s názvom "Out.exe" v rovnakom priečinku
ako aplikácie, ktoré sú spustené.
POZNÁMKA: Môžete upraviť kód v textbox vidieť rôzne kompilátor
chyby. Napríklad odstrániť jeden z zátvorky a znova zostaviť
kód.
Napokon, upraviť kód bloku textu na iný výstup
riadok textu do okna konzoly. Kliknite na tlačidlo Spustiť Ak chcete zobraziť výstup.
DÔLEŽITÉ: Tento článok bol preložený pomocou softvéru na strojový preklad od spoločnosti Microsoft, nie prekladateľom. Spoločnosť Microsoft ponúka články preložené prekladateľmi aj strojovo preložené články, vďaka čomu máte možnosť prístupu ku všetkým článkom databázy Knowledge Base vo svojom jazyku. Strojovo preložený článok však nie je vždy perfektný. Môže obsahovať chyby týkajúce sa slovnej zásoby, syntaxe alebo gramatiky, podobne ako cudzinec môže robiť chyby, keď rozpráva vašim jazykom. Spoločnosť Microsoft nenesie zodpovednosť za akékoľvek nepresnosti, chyby alebo škody spôsobené akýmkoľvek nepresným prekladom obsahu alebo jeho použitím zo strany zákazníkov. Spoločnosť Microsoft softvér na strojový preklad pravidelne aktualizuje.
Pokiaľ chcete vidieť anglickú verziu článku, kliknite sem:304654