İnformatikanin əsaslari

Dim intX As Integer, lngI As Long Private Sub cmdStart_Click()
‗Miqyas
picAnim.Scale (-10, 10)-(10, -10)
‗Animasiya
For intX = -10 To 10
‗Şəkilçəkmə picAnim.FillColor = vbBlue
picAnim.Circle (intX, 0), 1, vbBlue
‗Şəkli silmənin yubadılması For lngI = 1 To 10000000 Next lngI
‗Şəklin silinməsi picAnim.FillColor = vbWhite


¹¹⁵ Hər hansı obyektin ekranda hərəkət illüziyası
¹¹⁶ Şəkillərin bir-birini əvəzetmə sürətini
picAnim.Circle(intX, 0),1,vbWhite
Next intX

End Sub

3. 
   Layihəni Start düyməsi ilə icraya buraxmalı və \textbook\VB\prjVB12\ adı ilə saxlamalı.
   

11. 
    Visual Basic dilində ümumi prosedurlar
    

Prosedurların görünmə oblastı.

Mürəkkəb alqoritmlərin tərtibi zamanı müəyyən alt məsələlərin həllini reallaşdıran əməllər ardıcıllığını seçib ayırmaqla köməkçi alqoritmlər yaratmaq və lazım gəldikcə əsas alqoritmə çağırıb istifadə etmək məqsədəuyğun olur. Prosedur dillərdə buna alt proqram deyilir. Obyekt-istinad dillərində köməkçi alqoritmlər ümumi prosedurların köməyi ilə reallaşdırılır.
Ümumi prosedurun müəyyən edilməsi. Hər bir ümumi prosedura unikal (təkrar olunmaz) ad (prosedurun adı) verilir və prosedurun giriş və çıxış parametrlərinin siyahısı müəyyən edilir.
Giriş parametrlərin siyahısı dəyişənlər yığımından ibarətdir. Bunların qiymətləri prosedurun icrasından əvvəl məlum olmalıdır.
Çıxış parametrlərin siyahısı prosedurun icrasından sonra qiymətləri bəlli olan dəyişənlər yığımından ibarətdir.
Ümumi prosedurun sintaksisi aşağıdakı kimidir: Sub ProsedurAdı (ParametrlərSiyahısı) Proqram kodu

End Sub