Primer 9.- Jednostavan program koji koristi niz :

 

Program prikazuje elemente niza u list box- u:


Private Sub Exit_Click()

Unload Me

End Sub

 

Private Sub Start_Click()

Dim i As Integer

Dim Niz(5) As Integer

For i = 0 To 5

    Niz(i) = i ^ 2

    List1.AddItem Niz(i)

Next i

End Sub


 

Prethodna strana