Untitled

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim row0 As String() = {"3/5/1970", "Matthew's Birthday"}
        With Me.DataGridView1.Rows
            .Add(row0)
        End With
        With Me.DataGridView1
            .Columns(0).DisplayIndex = 0
        End With
    End Sub

    Private Sub addNewRowButton_Click(ByVal sender As Object, _
        ByVal e As EventArgs) Handles btnAdd.Click

        Me.DataGridView1.Rows.Add()

    End Sub

    Private Sub deleteRowButton_Click(ByVal sender As Object, _
        ByVal e As EventArgs) Handles btnDelete.Click

        If Me.DataGridView1.SelectedRows.Count > 0 AndAlso _
            Not Me.DataGridView1.SelectedRows(0).Index = _
            Me.DataGridView1.Rows.Count - 1 Then

            Me.DataGridView1.Rows.RemoveAt( _
                Me.DataGridView1.SelectedRows(0).Index)

        End If

    End Sub


End Class