Belajar cara Mengunakan perulangan dan array
Apa itu array ?
Array adalah sekumpulan variabel yang memiliki type data yang sama dan dinyatakan dengan nama yang sama.
Apa fungsi dari Array?
Array memungkinkan kita untuk menyimpan data ataupun referensi objek dengan jumlah yang banyak dan terindeks. Indeks dalam array menggunakan integer, indeks ini digunakan untuk menentukan urutan dari elemen-elemennya, dan urutan indeks array biasanya dimulai dengan indeks nol (0) pada elemen pertama, kemudian indeks satu (1) untuk elemen kedua, dan seterusnya.
Bagaimana cara mendeklarasikan Array di Vb.NET
Mendeklarasikan variabel array dengan type data tertentu caranya hampir sama dengan mendeklarasikan variabel pada umumnya. Hanya saja pada pendeklarasian variabel array biasanya menggunakan tanda kurung yang diletakkan setelah nama array. Berikut ini contoh pendeklarasian variabel array pada vb.net.
Pada Array 1 dimensi
Array satu dimensi yaitu array yang deretan nilainya adalah linier dan squensial, atau sering disebut sebagai representasi data bentuk row atau 1 dimensi.
Dim Arr(0) As String
Pada Array 2 Dimensi atau Multidimensi
Array multidimensi merupakan sebuah variabel yang menyimpan sekumpulan data yang memiliki type data sama dan elemen yang akan diakses melalui banyak indeks. Array bentuk ini biasanya digunakan untuk merepresentasikan nilai dari sebuah tabel.
Dim arr(2, 1) As String
arr(0, 0) = "NIS"
arr(0, 1) = "Nama Siswa"
arr(1, 0) = "Jenis Kelamin"
arr(1, 1) = "No. HP"
Baiklah, agar penjelasan di atas dapat lebih mudah dipahami, mari kita coba praktekkan cara pembuatan array satu dimensi dan dua dimensi/multidimensi pada Vb.NET.
Lakukan settings pada propertis halaman visual studio rubah sesuai dengan kebutuhan kita
No Nama Propertis
1. Textboxt1 name = Textboxt1
2. Textboxt2 name.text = Textboxt2
3. TextBoxt3 name = Textboxt2
4. Button1 name = button1
Setelah desain interface selesai, maka selanjutnya kita masukkan coding pada objek Form1_Load dan Button, seperti di bawah ini:
Double Click pada Form (form yang saya gunakan namanya Form1), kemudian ketik coding di bawah ini:
Kemudian di input pada bagian textbox, dan dikilk tambah, maka contoh hasilnya akan seperti gambar berikut ini:
Array Dua Dimensi/Multidimensi
- Tambahkan 1 Form baru pada aplikasi VB.NET yang sudah dibuka diatas, kemudian desain Form Seperti di bawah ini:
- Pada aplikasi kali ini, nama objeknya tidak ada yang di rubah, jadi masih menggunakan nama bawaan objeknya masing-masing
- Kemudian ketikkan coding di bawah ini:Double Click pada Form1_Load, kemudian ketik codingnya di bawah ini:.
Public Class Form2
Private Sub TextBox4_TextChanged(sender As Object, e As EventArgs)
End Sub
Private Sub ComboBox2_SelectedIndexChanged(sender As Object, e As EventArgs)
End Sub
Private Sub Form2_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim arr(3, 1) As String
arr(0, 0) = "NRP"
arr(0, 1) = "NAMA"
arr(1, 0) = "JENIS KELAMIN"
arr(1, 1) = "PRODI"
arr(2, 0) = "LAKI LAKI"
arr(2, 1) = "PEREMPUAN"
arr(3, 0) = "Teknik Tanam Paksa"
arr(3, 1) = "Minum Susu Ultra Mik"
ListView1.GridLines = True
ListView1.View = View.Details
For baris = 0 To 1
For Kolom = 0 To 1
ListView1.Columns.Add(arr(baris, Kolom))
Next Kolom
Next baris
For baris = 2 To 2
For kolom = 0 To 1
ComboBox2.Items.Add(arr(baris, kolom))
Next kolom
Next baris
For baris = 3 To 3
For kolom = 0 To 1
ComboBox1.Items.Add(arr(baris, kolom))
Next kolom
Next baris
End Sub
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim arr(3) As String
arr(0) = TextBox1.Text
arr(1) = TextBox2.Text
arr(2) = ComboBox2.Text
arr(3) = ComboBox1.Text
Dim data As ListViewItem
data = ListView1.Items.Add(arr(0))
data.SubItems.Add(arr(1))
data.SubItems.Add(arr(2))
data.SubItems.Add(arr(3))
TextBox2.Text = TextBox2.Text + 1
TextBox1.Clear()
ComboBox1.SelectedIndex = -1
ComboBox2.SelectedIndex = -1
TextBox1.Focus()
End Sub
End Class
Setelah selesai, lalu tekan F5 untuk menjalankan program. Dan silahkan coba diinput dan klik tambah, maka hasilnya akan seperti di bawah ini:
