如何去掉Datagrid中的新增行

datagrid

 
在编程中我们经常遇到这样的问题，我们想要Datagrid的readonly属性为False，直接在Datagrid中修改数据。但又不想让它出现新增的行，这个问题很多网友发贴问过，事实上实现起来非常简单，只是大家没想到而已。下面通过一个简单示例说明之

首先在界面中添加一个Datagrid和一个Button按钮，Name为默认值，双击Button1编写以下代码。

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        dtNew.Columns.Add("时间", GetType(String))
        dtNew.Columns.Add("成本", GetType(String))
        Dim intCircle As Integer
        For intCircle = 0 To 3
            Dim dtrow As DataRow

            dtrow = dtNew.NewRow
            dtrow(0) = 2000 + intCircle
            dtrow(1) = 3500 + 20 * intCircle
            dtNew.Rows.Add(dtrow)
        Next
        Dim dtView As New DataView
        dtView = dtNew.DefaultView
        dtView.AllowNew = False              '消除新增行
        dtView.AllowDelete = False        '不让用户通过键盘上的Delete键删除行
        Me.DataGrid1.DataSource = dtView

    End Sub

按F5试试，结果就出来了！