İnformatikanin əsaslari

“Funksiyanın qrafikinin qurulması” layihəsi.

1. 
   Forma üzərində qrafikin qurulmasının həyata keçirilməsi üçün picGraph qrafik sahəsi yerləşdirməli.
   

Proqram kodunun aydın olması üçün ona izahlar (şərhlər) daxil etmək məqsədə uyğundur. Şərhlər apostrofla başlanır.

2. 
   Forma üzərində cmd1 düyməsi yaratmalı və hadisəvi proseduru aşağıdakı kimi yazmalı:
   

Dim sngX As Single, int As İnteger Sub cmd1_Click()
‗Miqyasın daxil edilməsi
picGraph.Scale (-10, 2)-(10, -2)
‗Qrfikin qurulması
For sngX = -10 To 10 Step 0.01 picGraph.PSet (sngX, Sin(sngX)) Next sngX
‗X oxu
picGraph.Line (-10, 0)-(10, 0)
For intİ = -10 To 10
picGraph.PSet (intİ, 0) picGraph.Print intİ Next intİ
‗Y oxu
picGraph.Line (0,2)-(0, -2)
For intİ = -2 To 2
picGraph.PSet (0, intİ) picGraph.Print intİ Next intİ

End Sub

3. 
   Layihəni icraya buraxmalı və \textbook\VB\prjVB11\ adı ilə saxlamalı.
   

Animasiya¹¹⁵. Animasiya, multiplikasiyada olduğu kimi, kadrların (şəkillərin) əvəzlənməsi prinsipi ilə yaradılır. Hərəkəti imitasiya (təqlid) edən proqram aşağıdakı mərhələlərdən ibarət olmalıdır:

1. 
   ekranda şəklin yaradılması;
   
2. 
   şəklin gözlə görünməsi üçün pauza yaradılması;
   
3. 
   şəklin korreksiyası (dəyişdirilməsi).
   

“Dairənin hərəkəti” layihəsi.

1. 
   Dairənin hərəkət etməsi üçün forma üzərində picAnim adlı mətn sahəsi yaratmalı.
   

OX oxu üzrə hərəkəti dövrlə reallaşdıraq. Animasiya effektini almaq üçün dairəni göy rənglə rəngləyib silmək lazımdır. Rəngli dairə almaq üçün FillColor xassəsinə qiymət vermək (rəngləyəndə vbBlue, siləndə vbWhite) lazımdır. FillStule xassəsi üçün verilən qiymət Transparent (şəffaf) və Solid (tünd) ola bildiyindən, Solid vermək lazımdır.
Dairənin hərəkət sürətini¹¹⁶ tənzimləmək üçün şəkilçəkmə ilə şəkli silmə arasında boş
dövr yaradıb müvafiq sayda təkrarlamalardan istifadə etmək olar.

2. 
   Forma üzərində cmdStart düyməsi yaradıb onun üçün aşağıdakı hadisəvi proseduru yazmalı: