Larik (Array) adalah sebuah variable yang didalamnya mempunyai anggota elemen sejenis yang berderet dan nilai dari masing masing elemen dapat di akses dengan menunjuk indek dari masing masing elemen .
Larik(Array ) ada beberapa jenis diantaranya adalah :
a. Larik (Array) Satatis Satu dimensi yaitu jenis Larik dimana elemen elemnya hanya satu dimensi dan telah di tentukan jumlah elemennya.
contoh :
Siswa ( 4 ) = (ani, dian, edo , mei mei, joko)
Kode VB.net :
'Deklarasi Larik
Dim Siswa (4) as string = new siswa(){"ani","dian","edo","mei mei", " joko"}
'untuk mengakses indeknya
For each elemen as integer in siswa
console write.ln (elemen)
next
Keluaran :
ani
dian
edo
mei mei
joko
Keluaran :
ani
dian
edo
mei mei
joko
b. Larik (Array) Dinamis satu dimensi yaitu jenis larik dimana elemnya hanya satu dimensi namun jumlah elemenya bersifat Dinamis.
contoh :
Siswa ( ) ' jumlah elemen belum ditentukan / tak punya elemen
Siswa ( 5 ) ' Larik telah di isi
mengisi kan data ke masing2 elemen
siswa (0) = { ani }. siswa ( 1) = { dian }. siswa ( 2 ) = {edo} siswa(3)={mei mei} siswa(4)={ joko}.
KODE VB.NET :
' deklarasi variable
' deklarasi variable
dim siswa ( ) as string
redim siswa (4)' medeklarasikan ulang dengan 4 elemen
siswa (0 ) = " ani"
siswa (1 ) = " dian"
siswa (2 ) = " edo"
siswa (3 ) = " mei mei"
siswa (4 ) = " joko"
Keluaran :
ani
dian
edo
mei mei
joko
'untuk mengakses indeknya
For each elemen as integer in siswa
console write.ln (elemen)
nextKeluaran :
ani
dian
edo
mei mei
joko
c. Larik (Array) dua dimensi yaitu jenis larik yang mempunyai elemen berstruktur dua dimensi .
Contoh :
Lebar ( 2, 3 ) = { ( 0 , 0) (0, 1) (0, 2) (0,3) (1,0) (1,1)(1,2) (1,3) (2,0) (2,1) (2,2) (2,3) }
CODE VB.NET :
' deklarasi larik dua dimensi
dim lebar ( 2, 3) as integer
' mengisi nilai masing masik elemen dari larik
lebar (0,0) = 1
lebar (0 ,1)= 5
lebar (0 ,2)= 2
lebar (0 ,2)= 2
lebar (0 ,3)= 5
lebar (1 ,0)= 7
lebar (1 ,1)= 6
lebar (1 ,2)= 5
lebar (1 ,3)= 5
lebar ( 2,0)= 4
lebar (2 ,1)= 7
lebar (2 ,2)= 5
lebar ( 2,3)= 6
' meng akses masing masik indek elemen
dim nil_atasarr1 as integer, nilatasarr2 as integer
dim s1 as integer
dim s1 as integer
nil_atasarr1 = lebar.getupperbound (0)
nil_atasarr2= lebar.getupperbound (1)
for x as integer = 0 to nil_atasarr1 -1
for y as integer= 0 to nil_atasarr2 -1
s1= lebar (x,y)
s1= lebar (x,y)
console.writln (s1)
next
next
Keluaran :
1
5
2
2
5
7
6
5
5
4
7
5
6
Tidak ada komentar:
Posting Komentar