Cara membuat aplikasi array satu dimensi di visual basic 2010

    Kita sudah mempelajari pengertian array beserta jenis-jenisnya di postingan saya sebelumnya di Memahami dan mengenal array pada Microsoft Visual Basic 2010. sesuai janji saya yang pada postingan sebelumnya itu untuk langsung mencoba implementasikan kedalam form agar teman-teman lebih mendalami jauh, lagi, sekarang kita langsung saja tinggal mempraktekannya. array yang di garap kali ini yaitu array satu dimensi. Caranya sangat sederhana dan mudah dipahami, dimulai dari sekarang.

1, Buat Project baru, berinama terserah kemudian Ok.
2. Buat form dan desain seperti gambar beikut ini :


3. Tambahkan kontrol ke Form seperti gambar diatas dan atur propertinya seperti tabel berikut :


Object Properties Nilai
Form1 Name
Text
Form1
Array Satu Dimensi
Label1 Text NIM
Label2 Text Nama
Label3 Text Prodi
TextBox1 Name TxtNIM
TextBox2 Name TxtNama
Text Box3 Name TxtProdi
ListView1Name ListView1
Button1 Name BtnTambah
Tambah

4. Klik Ganda pada Form utama, kemudian masukan kode program berikut ini :


Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        ListView1.GridLines = True
        ListView1.View = View.Details
        ListView1.Columns.Add("NIM")
        ListView1.Columns.Add("NAMA", 115)
        ListView1.Columns.Add("PRODI", 110)
        TxtNIM.Text = 1
        TxtNama.Focus()
    End Sub

5. Klik ganda BtnTambah, kemudian masukan kode berikut ini :

Private Sub BtnTambah_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnTambah.Click
        Dim Arr(2) As String
        Arr(0) = TxtNIM.Text
        Arr(1) = TxtNama.Text
        Arr(2) = TxtProdi.Text
        Dim listitem As ListViewItem
        listitem = New ListViewItem
        listitem = ListView1.Items.Add(Arr(0))
        listitem.SubItems.Add(Arr(1))
        listitem.SubItems.Add(Arr(2))
        TxtNIM.Text = TxtNIM.Text + 1
        TxtNama.Text = ""
        TxtProdi.Text = ""
        TxtNama.Focus()
    End Sub
End Class

6. Coba jalankan dan operasikan programnya dengan menekan tombol F5 atau Debug > Start Debugging, programnya akan nampak bekerja seperti ini.


7. Simpan projectnya jika perlu.

Akhirnya kita telah menyelesaikan form array satu dimensi, next kita coba selesaikan form array multi dimensi.

Next
Previous
Click here for Comments

0 komentar: