Array Posted on Selasa, 11 Mei 2010 |

ARRAY

1.Array Dimensi Satu
Adalah sebuah variabel memory yang berisi beberapa data sejenis , data tersebut di simpan dengan nomor urut tertentu yang disebut index. Jika x adalah variabel array.
Bentuk umum :
Dim nama_variabel (Index) As tipe_variabel
2. Array Multi Dimensi
Yang terdiri dari dan kolom
Bentuk umum :
Dim nama_variabel (n1,n2) As tipe_data (n1=baris, n2=kolom)
Contoh Program Latihan Array “




Tampilan Code View


Dim nilai (5.5),j,i,b,k As Byte
Private Sub Cmdarray1_Click()
On Error Resume Next
List1.Clear
J= InputBox(Masukan Jumlah Data Teman Anda”,”Input Jumlah Data”,0)
For I = 1 To j
Nm(i) = InputBox(“Masukan Nama Teman Anda yang ke-“+Str(i),” Input Jumlah Data”,”nama”)
Next
For I = 1 To j
List. Additem Ucase(nm((i)
Next i
End sub
Private sub cmdarraymulti_click()
On error resume nest
List1.clear
b = INPUTBOX(“Mauskkan Jumlah Baris”,”Input Baris”,0)
for I = 1 To b
for j = 1 to k
nilai (i,j)=InputBox(“Nilai pada(“ + Str(i) + “,” + Str(j) +”)”,”Input Nilai Matrik”,0)
next
next
for i = to b
for j = to k
list1.Additem “Nilai(“ + Str(i)+”,”+Str(j) +”)=” + str(nilai(I,j))
next
next
end sub