Microsoft VB.NET ist eine Programmiersprache, auf dem BASIC-Sprache , deren Buchstaben stehen für Basis " Beginners All Purpose Symbolic Instruction Code". VB.NET verfügt über Funktionen für die Erstellung von vielen verschiedenen Arten von Anwendungen , einschließlich derjenigen mit Grafiken . Einen VB.NET Programm, das auf einer Zeichnung Funktion ruft beinhaltet die Arbeit mit den Grafiken Klassen in VB.NET ' s Objektmodell. Dieses Objektmodell ist wie ein Stammbaum der virtuellen Blaupausen , die so genannte Klassen , aus denen Programmierer erstellen virtuelle Objekte . Erstellen Sie eine Funktion , die in VB.NET zieht ist ein Meilenstein für Programmierer wollen komplexe Grafiken Anwendungen wie Spiele und Design-Programme zu bauen. Anleitung
1
öffnen VB.NET, dann klicken Sie auf " Neues Projekt" -Link auf der Startbildschirm .
2
Klicken Sie auf " Windows Form " Element in der Liste , dass erscheint. Diese Aktion erstellt ein Programm mit einer benutzerfreundlichen Eingabeformular . Sie finden , dass die Form anpassen, um ein Grafikzeichnungen Funktion aufrufen.
3
Öffnen Sie das Formular Design-Fenster durch Drücken der " Shift" und "F7" gleichzeitig , dann klicken Sie auf die Hammer -Symbol auf der Symbolleiste unterhalb der Menü-Überschriften , um das Steuerelemente Toolbox.
4
Ziehen Sie ein "Button" Artikel aus dem Steuerelement -Toolbox an einen beliebigen Ort auf dem Formular , doppelklicken Sie dann auf die Schaltfläche. VB.NET werden Sie auf die Codierung Fenster bringen, um Ihr Programm eingeben.
5
Fügen Sie den folgenden Programm-Listing in den kodierenden Fenster . Dieses Programm ruft die Funktion " DrawGraphics " , die eine Form zieht auf das Formular , in das Sie soeben einen Button . Das "Me" im Programm bezieht sich auf die Form . Um auf das Formular ziehen , erstellt das Programm eine virtuelle " Pen" -Objekt, das in der Variable gespeichert ist " GPEN . "
Public Class Form1
Private Sub Button1_Click (ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click
DrawGraphics ()
End Sub private Function
DrawGraphics ()
Dim As New GPEN Drawing.Pen ( System.Drawing.Color.Black , 1) german
Me.CreateGraphics.DrawEllipse ( GPEN , 20, 20 , 80, 80)
gpen.Dispose ()
End Function End Class
6
Führen Sie das Programm mit der Taste " F5 ", und drücken Sie dann das Formular -Button. VB wird die Funktion " Button1 " Code, der die " DrawGraphics " Funktion aufruft. Dieser Funktion wird eine Ellipse auf das Formular.
7
Klicken des Formulars "X" -Symbol, um das Formular zu schließen und das Programm beenden .
8
Presse "Shift" und "F7" gleichzeitig , um das Formular -Design -Fenster eingeben , dann ziehen Sie vier Textfelder , die jeweils unter dem vorherigen, aus der Steuerelemente Toolbox auf das Formular. Diese Boxen werden Parameter halten , dass Sie auf die Grafiken Zeichenfunktion Sie zuvor erstellt passieren .
9
Re - geben die Codierung Fenster durch Doppelklick des Formulars und wählen Sie dann alle vorhandenen Programmcode und drücken Sie auf " löschen", um es zu löschen.
10
die folgende Überarbeitung des Programmcodes Einfügen in das Code-Fenster . Dieses neue Programm nennt die Grafikzeichnungen Funktion " DrawGraphics " in einer neuen Weise. Das Programm übergibt Parameter aus den Textfeldern Sie nur DrawGraphics hinzugefügt , die bestimmt, der Ellipse Lage und Größe von diesen Parametern .
Public Class Form1
Private Sub Button1_Click (ByVal sender As System.Object , ByVal e As System.EventArgs ) Handles Button1.Click
DrawGraphics ( CInt ( TextBox1.Text ) , CInt ( TextBox2.Text ) , CInt ( TextBox3.Text ) , CInt ( TextBox4.Text )) < br >
End Sub private Function
DrawGraphics (ByVal x1, ByVal y1, ByVal x2, ByVal y2)
Dim As New GPEN Drawing.Pen ( System.Drawing.Color.Black , 1) german
Me.CreateGraphics.DrawEllipse ( GPEN , x1 , y1, x2, y2)
gpen.Dispose ()
End Function End
Klasse
11
Führen Sie das Programm , wie Sie den vorherigen tat. Geben Sie alle Zahlen von 0 bis 100 in jedem der Textfelder . Diese Zahlen stellen Bildschirm Koordinaten , die die Position der Ellipse zu bestimmen.
12
Drücken des Formulars klicken. Der überarbeitete DrawGraphics Funktion wird eine Ellipse am Bildschirm eingegebenen Koordinaten zu zeichnen.
