怎样判断一个DataGrid多行被选中?并且删除这多行?

jackjack 2002-09-29 02:17:39
在一个button里实现该功能?
...全文
54 8 打赏 收藏 举报
写回复
8 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
jackjack 2002-10-09
实时绑定删除多行???
好象比较困难
  • 打赏
  • 举报
回复
okjpan 2002-10-08
Public Function GetSelectedRows(ByVal datagrid1 As DataGrid) As System.Collections.ArrayList
Dim al As New System.Collections.ArrayList()
Dim i As Integer
' line assume's datasource is dataset - if datasource is datatable 2nd option
' While i < CType(dataGrid1.DataSource, DataSet).Tables(0).Rows.Count 'option 1
While i < CType(datagrid1.DataSource, DataTable).Rows.Count 'option 2
If datagrid1.IsSelected(i) Then
al.Add(i)
End If
i = i + 1
End While
Return al
End Function 'GetSelectedRows
Private Sub button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim s As String = "Selected rows:"
Dim o As Object
For Each o In GetSelectedRows(dataGrid1)
s += " " + o.ToString()
Next o
MessageBox.Show(s)
End Sub 'button1_Click
  • 打赏
  • 举报
回复
jackjack 2002-09-29
有其他的问题
不过不在这个问题范围内
新增一条记录也会报这个错
刚发现,新增好几条记录不定
奇怪
  • 打赏
  • 举报
回复
mynewpc 2002-09-29
这也简单,不会再有别的问题吧?
  • 打赏
  • 举报
回复
jackjack 2002-09-29
还要加DataGrid1.focus才能用
严重错误:未将对象引用设置到对象的实例
  • 打赏
  • 举报
回复
mynewpc 2002-09-29
不会吧,你把错误信息贴出来看看
  • 打赏
  • 举报
回复
jackjack 2002-09-29
楼上的兄弟:
用这说的个有问题,
有时会报一些莫名其妙的错误!!!
  • 打赏
  • 举报
回复
mynewpc 2002-09-29
SendKeys.Send("{DELETE}")
  • 打赏
  • 举报
回复
发帖
VB

1.6w+

社区成员

VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
帖子事件
创建了帖子
2002-09-29 02:17
社区公告
暂无公告