Catatan Programmer Coeloen

Untuk keperluan tertentu ListView juga dapat digunakan sebagai tabel, misalkan untuk menanpilkan hasil perpangkatan dan lain-lain.Sebagai contoh dalam posting ini kita akan menghitung nilai perpangkatan dan menampilkannya kedalam ListViewl yang telah di design menjadi tabel.


Atur Properties ListView


tambahkan 4 Textbot, 1 Label dan 1 Buttons

Setelah itu masukan listing kode dibawah ini.

Private Sub btn1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn1.Click
        Dim baris As Integer, batas As Integer, tot1 As Integer, tot2 As Integer, tot3 As Integer
        batas = txtbatas.Text

        'melakukan perhitungan pangkat'
        For baris = 1 To batas Step 1
            lsttable.Items.Add(baris)
            lsttable.Items(baris - 1).SubItems.Add(baris * baris)
            lsttable.Items(baris - 1).SubItems.Add(baris * baris * baris)

            'melakukan perhitungan total'
            tot1 = tot1 + baris
            tot2 = tot2 + baris * baris
            tot3 = tot3 + baris * baris * baris
        Next
        txtp1.Text = tot1
        txtp2.Text = tot2
        txtp3.Text = tot3
    End Sub

Kemudian jalankan progra ( tekan F5 )
Jika berhasil hasil/output akan sesuai dengan inputan tang kita masukan..sekian postingan kali ini semoga bermanfaat untuk kita semua..Amiiin.