'新增行    Private Sub Add_Row()
        Dim ldrw_data As DataRow = CType(Me.Datagv_ShowName.DataSource, DataTable).NewRow
        CType(Me.Datagv_ShowName.DataSource, DataTable).Rows.Add(ldrw_data)
        CType(Me.Datagv_ShowName.DataSource, DataTable).AcceptChanges()
        New_Rows = Me.Datagv_ShowName.Rows.Count - 2
    End Sub
'赋值事件,我每点一次,他就会在datagridview后面新增一空白行 ,
 现在问题是:我在datagridview新增一行,就会在对应的行列赋一个值给它,
 可是我在第二次点击赋值事件时,他也会在对应的行列赋一个值给它,但是他会把上次赋值的内容清空,使得上次赋值的行列没有值。

    Private Sub btn_MenuOnCmd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_MenuOnCmd.Click
     Add_Row()
     Me.Datagv_ShowName.Rows(New_Rows).Cells(1).Value = Str_MenuName   
    End Sub