Array dapat diciptakan Menggunakan Pernyataan sebagai berikut :
Dim coba_array() As String = {"faiz", "fadly", "Fitri", "Yuli"}
Untuk mengambil isi array kita bisa menggunakan notasi : [variable(index array ke)]
Misalnya kita akan mengambil isi array yang ke tiga, maka notasinya sebagai berikut : coba_array(3). isi array yang tampil adalah : Yuli.
Ok sekarang kita akan langsung praktek. buka visual strudio anda dan mulailah membuat project baru.
Sediakan dua kontrol label dan dua kontrol ComboBox. Tampilannya sebagai berikut:
Selanjutnya pastekan kode di bawah ini di form_load even :
Dim a() As String = {"faiz", "fadly", "farida", "yuli"}
'menampilkan index array yang ke 3
ComboBox1.Items.Add(a(3))
Untuk Menampilkan Seluruh indek array kita bisa menggunakan perulangan contoh :
For i As Integer = 0 To 3
ComboBox2.Items.Add(a(i))
Next
Kode Lengkapnya :
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim a() As String = {"faiz", "fadly", "farida", "Yuli"}
'menampilkan index array yang ke 3
ComboBox1.Items.Add(a(3))
'menampilkan seluruh index array
For i As Integer = 0 To 3
ComboBox2.Items.Add(a(i))
Next
End Sub
End Class
Hasilnya :
Selamat Mencoba.......................... ;-)
download demo program tutorialnya

0 comments:
Post a Comment