"oodulis" - 1 õppematerjal

Graafika lahendatud lõpp

Cut Lõikamine Shapes("paat").Delete Delete Eemaldamine Set kuju = Shapes("post").Duplic auto.IncrementLeft 20 kuju.ScaleWidth 1.2, False t = kuju.left + dx p = kuju.Top + dy tation = kuju.Rotation + pn dite kasutamine etod [argumendid] b puududa kui protseduur sama lehe oodulis, kus asub objekt. ntide kasutamine sõltub meetodist. paat").Delete = Shapes("post").Duplicate ementLeft 20 leWidth 1.2, False Kuju omaduste muutmine Veski. Liikumine. Lõpmatu kordus J  Sõida Tee ringe Auto testimine 1 Distants ringe samm paus ring 800 5 10 0,01 5 Sub Test() Dim n, i, algaeg, auto As Shape