Membuat Kolom Pada DataGridView VB.net

Berikut kode untuk membuat Kolom Pada DataGridView Vb.net

GrdKasir.Columns.Add("Kode", "Kode")
        GrdKasir.Columns.Add("Nama", "Nama")
        GrdKasir.Columns.Add("Qty", "Qty")
        GrdKasir.Columns.Add("Harga", "Harga")
        GrdKasir.Columns.Add("Total", "Total")


dan kode yang ini utuk lembar kerja seperti pada ms.Excel

Private Sub DGV1_CellEndEdit(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellEndEdit
If e.ColumnIndex = 1 Then
DataGridView1.Rows(e.RowIndex).Cells(4).Value =    DataGridView1.Rows(e.RowIndex).Cells(1).Value * DataGridView1.Rows(e.RowIndex).Cells(3).Value
ElseIf e.ColumnIndex = 3 Then
DataGridView1.Rows(e.RowIndex).Cells(4).Value = DataGridView1.Rows(e.RowIndex).Cells(1).Value * DataGridView1.Rows(e.RowIndex).Cells(3).Value
End If
End Sub