以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]用按钮删除选定的数据表记录行  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59706)

--  作者:tommywen01
--  发布时间:2014/11/9 12:06:00
--  [求助]用按钮删除选定的数据表记录行
请问,怎么用按钮实现删除选中记录行的功能?
即数据表中选中记录行的时候,点一下按钮就把该行记录删了。
--  作者:y2287958
--  发布时间:2014/11/9 12:50:00
--  
参考这里:
--  作者:有点甜
--  发布时间:2014/11/9 14:15:00
--  
For i As Integer = CurrentTable.BottomPosition To CurrentTable.TopPosition Step -1
    CurrentTable.Rows(i).Delete
Next

--  作者:tommywen01
--  发布时间:2014/11/10 16:49:00
--  
 谢谢,如果未选中任何记录行,则生成相应的提示,代码上应该如何表达?
CurrentTable Is Nothing?

--  作者:有点甜
--  发布时间:2014/11/10 16:51:00
--  

If CurrentTable.Rows.Count > 0 Then
    For i As Integer = CurrentTable.BottomPosition To CurrentTable.TopPosition Step -1
        CurrentTable.Rows(i).Delete
    Next
Else
    msgbox("请选择")
End If


--  作者:Bin
--  发布时间:2014/11/10 16:51:00
--  
if CurrentTable.current is nothing then
   messagebox.show("没选中")
else
For i As Integer = CurrentTable.BottomPosition To CurrentTable.TopPosition Step -1
    CurrentTable.Rows(i).Delete
Next
end if