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

jackjack 2002-09-29 02:17:39
在一个button里实现该功能?
...全文
69 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
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}")

16,553

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧