Ako volať funkcie , ktoré získava v VB.NET

Microsoft VB.NET je programovací jazyk založený na jazyku BASIC , ktorého písmená znamenajú " začiatočníkov All Purpose Symbolic Instruction Code . " VB.NET má funkcie pre vytváranie mnohých rôznych typov aplikácií , vrátane tých , ktoré s grafikou . Tvorba programu VB.NET , ktorý volá na funkciu kreslenie zahŕňa prácu s triedami grafiky v modeli objektu VB.NET je . Tento objektový model je rovnako ako rodinný strom virtuálnych plánov , s názvom triedy , z ktorej programátorom vytvárať virtuálne objekty . Tvorba funkciu , ktorá kreslí v VB.NET je míľnikom pre programátorov , ktorí chcú vytvárať zložité grafické aplikácie , ako sú hry a dizajnových programov . Návod dovolená 1

Otvoriť VB.NET , kliknite na odkaz " Nový projekt " na úvodnej obrazovke .
2

Kliknite na " Windows Form " položku v zozname , ktorý zobrazí sa . Táto akcia vytvorí program s užívateľským zadávanie dát formulára . Budete prispôsobiť tento formulár volať grafiky kreslenie funkciu .
3

Otvorte okno návrhu formulára stlačením tlačidla " Shift " a " F7 " súčasne , kliknite na ikonu kladivo na paneli nástrojov pod nadpisy v menu na zobrazenie na paneli Ovládacie prvky .
4

Pretiahnite tlačidla " " položku z panela nástrojov ovládacieho prvku na ľubovoľné miesto na formulári , potom dvakrát kliknite na tlačidlo . VB.NET sa dostanete do kódovania okna zadajte kód vášho programu .
5

vložte nasledujúci program uvádzajúci do kódovania okna . Tento program volá funkciu " DrawGraphics " , ktoré kreslí obrazce na formulári , do ktorého ste pridali tlačidlá . " Ja " v programe odkazuje na formu . Ak chcete kresliť do formulára , program vytvorí virtuálne " Pen " objekt , ktorý je uložený v premennej " gpen . " ClipArt

Public Class Form1 klipart

Private Sub Button1_Click ( ByVal odosielateľ As Object , byval e ako System.EventArgs ) Kľuky Button1.Click

DrawGraphics ( )

End Sub

private function DrawGraphics ( )

Dim gpen ako nový Drawing.Pen ( System.Drawing.Color.Black , 1 )

Me.CreateGraphics.DrawEllipse ( gpen , 20 , 20 , 80 , 80 )

gpen.Dispose ( )

End Function

End Class
6

spustite program stlačením tlačidla " F5 " , a potom stlačte tlačidlo formulára . VB spustí kód " Button1_Click " , ktorý volá " DrawGraphics " funkciu . Táto funkcia bude kresliť elipsu do formulára .
7

Kliknite na ikonu formulára " X " zatvorte formulár a ukončiť program .
8

Stlačením tlačidla " Shift " a " F7 " súčasne pre vstup do okna návrhu formulára , pretiahnite štyri textové polia , každý pod predchádzajúce , ze na paneli Ovládacie prvky na formulári . Tieto boxy budú držať parametre , ktoré budete odovzdať do grafického výkresu funkciu , ktorú predtým vytvorili .
9

Znova zadajte kódovanie okno pomocou tlačidla poklepaním formulára , potom vyberte všetky existujúce programový kód a stlačte tlačidlo " Delete " ju odstrániť .
10

vložte nasledujúci revíziu programového kódu do okna kódu . Tento nový program volá grafické kreslenie funkcie " DrawGraphics " novým spôsobom . Program odovzdáva parametre z textových polí práve pridali do DrawGraphics , ktorý určuje umiestnenie a veľkosť elipsy je z týchto parametrov .

Public Class Form1

Private Sub Button1_Click ( byval sender ako System.Object , byval e ako System.EventArgs ) Kľuky Button1.Click

DrawGraphics ( CInt ( TextBox1.Text ) , CInt ( TextBox2.Text ) , CInt ( TextBox3.Text ) , CInt ( TextBox4.Text ) )

End Sub

private function DrawGraphics ( byval x1 , byval y1 , byval x2 , byval y2 )

Dim gpen ako New Drawing.Pen ( System.Drawing.Color.Black , 1 )

Me.CreateGraphics.DrawEllipse ( gpen , x1 , y1 , x2, y2 ) ,

gpen.Dispose ( )

End Function

Koniec trieda
11

Spustiť program ako ste predchádzajúce . Zadajte ľubovoľné celé čísla od 0 do 100 v každom z textových polí . Tieto čísla predstavujú obrazovky súradníc , ktoré určujú polohu elipsy .
12

Stlačte tlačidlo formulára . Revidovaná funkcie DrawGraphics bude nakresliť elipsu v obrazovkových súradniciach , ktoré ste zadali .

• Predchádzajúca strana: Ako si vyrobiť telefónne hovory s Visual Basic 
• Ďalšia strana: Ako nastaviť hodnoty v Silverlight