Aynı tür bilgileri aynı anda bir değişkene atamak için kullanılan yöntemlerdir. Diziler birçok değişkene aynı adla ulaşmayı sağlayan bir grup veri yapısıdır. Dizilerin eleman sayısı 0 dan başlar. Eğer değişken numarasını 1 den başlamasını istiyorsak ilk satıra Option Base 1 yazılır. Dizi değişkenlerin üzerinde çalışılan form veya modülün declarations kısmında tanımlanması gerekir.

Örnek 1

Private Sub Form_Load()

    Dim ad(2) As String

    Dim no(2) As Integer

    ad(0) = "oguz"

    ad(1) = "ahmet"

    ad(2) = "mehmet"

    no(0) = 25

    no(1) = 75

    no(2) = 85

End Sub

Örnek 2

Bir sınıftaki öğrencilerin notlarını toplayıp ortalamalarını almak.

General_Declarations

Option Explicit

Option Base 1

Dim ogrenci(30) As Integer

Private Sub Form_Load()

    Dim sayi As Integer

    Dim a, toplam, ortalama

    sayi = InputBox("Öğrenci sayısını giriniz")

    For a = 1 To sayi

    ogrenci(a) = InputBox(Str(a) + ".Öğrencinin notunu girin")

    toplam = toplam + ogrenci(a)

    Next a

    FontSize = 15

    Show

    ortalama = toplam / sayi

    Print "Not Ortalaması :"; ortalama

End Sub

Örnek 2

Option Explicit

Option Base 1

Dim a(3) As Integer

Private Sub Command1_Click()

    Dim hesap

    a(1) = Text1.Text

    a(2) = Text1.Text

    a(3) = Text1.Text

    hesap = a(1) + a(2) + a(3)

    Print hesap

End Sub