Gambar 1 |
Sub BuatTabel()
LV.Columns.Add("NAMA BARANG", 100, HorizontalAlignment.Left)
LV.Columns.Add("HARGA", 100, HorizontalAlignment.Left)
LV.Columns.Add("DISC", 80, HorizontalAlignment.Left)
LV.Columns.Add("TOTAL HARGA", 100, HorizontalAlignment.Left)
LV.Columns.Add("JUMLAHJUAL", 100, HorizontalAlignment.Left)
LV.Columns.Add("JUMLAH BAYAR", 100, HorizontalAlignment.Left)
LV.View = View.Details
LV.GridLines = True
LV.FullRowSelect = True
End Sub