如何去掉Datagrid中的新增行

王朝other·作者佚名  2006-11-24
窄屏简体版  字體: |||超大  

在编程中我们经常遇到这样的问题,我们想要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试试,结果就出来了!

 
 
 
免责声明:本文为网络用户发布,其观点仅代表作者个人观点,与本站无关,本站仅提供信息存储服务。文中陈述内容未经本站证实,其真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。
 
 
© 2005- 王朝網路 版權所有 導航