Cara Menambah Kolom Pada LIstView

Dalam sebuah program adakalanya kita akan menggunakan ListView unt menampilkan data2 sebelum disimpan kedatabase, misal nya pada aplikasi kasir, dll
Berikut kode untuk menambah kolom2 pada listView

Private Sub BuatList()
        LvKasir.GridLines = True
        LvKasir.View = View.Details
        LvKasir.Columns.Add("KODE", 80)
        LvKasir.Columns.Add("NAMA BARANG", 200)
        LvKasir.Columns.Add("SATUAN", 110)
        LvKasir.Columns.Add("QTY", 70)
        LvKasir.Columns.Add("HARGA", 140)
        LvKasir.Columns.Add("TOTAL", 140)
    End Sub

terimakasih, semoga bermanfaat