Pembelian Barang Flasdisk Belajar Pemograman VB NET
Anda Harus desain dulu seperti di bawah ini...
Gambar. 1.1 |
Lalu anda ketikan coding di bawah ini...
Sub BuatTabel()
LV.Columns.Add("No Pembeli", 55, HorizontalAlignment.Left)
LV.Columns.Add("Kode Barang", 80, HorizontalAlignment.Left)
LV.Columns.Add("Nama Barang", 80, HorizontalAlignment.Left)
LV.Columns.Add("Merk", 70, HorizontalAlignment.Left)
LV.Columns.Add("Harga", 65, HorizontalAlignment.Center)
LV.Columns.Add("Jumlah Beli", 70, HorizontalAlignment.Center)
LV.Columns.Add("Total Harga", 75, HorizontalAlignment.Center)
LV.View = View.Details
LV.GridLines = True
LV.FullRowSelect = True
End Sub