Rajzoló funkciókat a környezetben a Visual Basic
A feladat táblázatkészítési funkcióját és felépítését a menetrendek az egyik legfontosabb feladat a folyamat megoldás a közönséges differenciálegyenletek. Úgy véljük, ez a probléma részletesebben.
Ábrázoljuk a függvény az y = sin (x), az [a, b]. Lépés táblázatos hozott egyenlő h.
A konstrukció a grafikont a funkciót a Visual Basic környezetben, kényelmes a használata néhány grafikus komponenseket.
9. ábra - Hely a fő összetevője az ablak Általános
K

10. ábra - objektum koordinátáinak PictureBox
Ábra. A 10. ábra az elrendezése tengelyek és koordinálja a sarokpontok az objektum.
Vonal () komponenst alkalmazunk az építőiparban a tengelyek és a grafikon a szaggatott vonal szegmensek.
A lényege az ábrázolás célja annak biztosítása, hogy a funkció be kell mutatni egy táblázatban (csoportosít), majd megjegyezte, a menetrend sablon pontokat és kösse össze őket egymással.
rajzoló funkció algoritmus látható a 12. ábrán az algoritmus lehet módosítani. Különösen egyes eljárások kombinálhatók, és az eljárás bizonyos esetekben lehet változtatni.
Tekintsük az algoritmus részletesebben.
Végrehajtását megelőzően az algoritmust kell ismertetni podprogrammu- funkciót telek. Erre azért van szükség, hogy megkönnyítsék a módosítás a program. Szükség esetén rajzoló másik funkciót, akkor csak meg kell változtatni a rutin.
Mielőtt ábrázolásával kell létrehozni és szerkeszteni formában. Példa kéziművesség ábrán látható 11. formájában kell, hogy gondoskodjon komponensek adatbeviteli komponenst, nyomtatáshoz asztalok, egy nyomógombbal, egy tartály elhelyezése grafika (PictureBox). Bent a PictureBox kell hívni Koordinátatengelyek egyenes vonalak és a címkét az szegmenshatáraival rögzítési funkció argumentumértékeket és extrém funkciók a szegmensben.
Kezdeti adatbeviteli végezzük az adott program, ha rákattint a parancs gombra. Nagyon gyakran, adatbevitelt valósítunk meg TextBox komponens.
Eljárás táblázatrendszer funkciót hajtjuk végre egy hurkot paraméter ismert, mint a pontok száma a grafikonon számít. meg kell határozni a sorok számát a táblázatban elvégzése előtt az eljárást.
A sorok számát a következő képlettel számítjuk k = n + 2, ahol k - a sorok számát és n - szegmensek száma a táblázatos. A sorok száma nagyobb lesz, mint a szegmensek száma 2, mivel szükség van, hogy vegye figyelembe a kiindulási pontig (nulla), és a szöveg rögzítésére oldal fejlécében oszlopokat.
Az eljárás maga táblázatos formában is össze a két dolgot - táblázatos formában és számítása szélsőségek. A következő oldatot listán látható programban risunke13.
A fő nehézség korrekt átmenet a matematikai függvény értékét és az argumentum a képernyő koordinátáit használt telek. A probléma megoldására kell vennie az ellenkező irányba a tengely egy matematikai gráf és a tárgy PictureBox, valamint a szükséges kép léptékét.
A skálázási tényezők grafikon a következőképpen számítjuk ki:

ahol kx - mérettényezővel az x tengelyen,
Npx - PictureBox tárgy képpontok számát juttatott telek vízszintes,
Egy - a kezdeti értéke az érv intervallum funkció
b - a végső értéket az érvelés a szegmens.

ahol Ky - méretezés együttható OY tengely
NPY - PictureBox képpontok számát az objektum kiosztandó ábrázolásakor a függőleges
min - legalább a függvény értékét,
max - a maximális érték a funkciót.
Translation matematikai koordinátái az aktuális pontot a képernyőn által termelt képletek:
ZX = Kerek (ox + (x (i) - a) * kx),
ZY = Round (Oy - (y (i) - Min) * ky),
ahol zx, zi - képernyő koordinátáit az aktuális pont,
ökör, Oy - koordinátáit a metszéspont a tengelyek PictureBox komponens,
x (i), Y (I) - a matematikai koordinátáit az aktuális pontot,
kx, ky - skálatényező.
A képlet kiszámításához képernyő koordináták koordinátái az aktuális pontot használnak „mínusz” jel hogy figyelembe az ellenkező irányban a tengely (a képernyőn, és a grafikon).
Listing Program rajzoló funkció a 13. ábrán látható.
Példák a formák a munka eredményeit programot bármilyen nyers adatok ábrán látható 14 és 15.

11. ábra - Egy példa a formák fejlesztése

12. ábra - Egy algoritmust megépítésének grafikonja
Rem Leírás változók
Dim X () As Single, y () As Single
Magán a As Single
Egyéni b As Single
Leírás Rem funkció, amelynek grafikonja kell építeni
F (t As Single) As Single
Private Sub Command1_Click ()
Rem Adatbeviteli
REM A számítás a táblázatos szakaszok
n = Kerek ((b - a) / h)
Rem Pereoopredelenie dinamikus tömböket
Rem számítása a sorok számát a táblázatban
MSFlexGrid1.Rows = n + 2
Rem Signature fejléctábla
MSFlexGrid1.TextMatrix (0, 0) = "x"
MSFlexGrid1.TextMatrix (0, 1) = "Y"
Rem Formirovaanie tömbök és keresése szélsőértékek
Ha y (i)> Max Ezután Max = y (i)
Ha y (i) MSFlexGrid1.TextMatrix (i + 1, 0) = Str (x (i)) MSFlexGrid1.TextMatrix (i + 1, 1) = Str (y (i)) Rem tiszta kép Rem számítása skálázási tényezők kx = (Picture1.Width - 1200) / (b - a) ky = (Picture1.Height - 1000) / (Max - Min) Rem Record szélsőértékek értékeket a diagramon minta Rem kiszámítása képernyő koordinátáit és a rajzoló funkciókat I = 0 N - 1 z1 = Kerek (720 + (x (i) - a) * kx) Z2 = Round (5400 - (y (i) - Min) * ky) Z3 = Kerek (720 + (x (i + 1) - a) * kx) Z4 = Round (5400 - (y (i + 1) - Min) * ky) Picture1.Line (z1, z2) - (Z3, Z4) 13. ábra - lista épület műsorrend
14. ábra - Az eredmény a program

15. ábra - Az eredmény a program