主题：[求助]是否删除选定行

foxtable系统自带的删除行时会提示我们是否删除选定行，但是在界面中新增一个Button（删除）的时候，却不会提示用户，想实现那样的效果，怎么弄？

此主题相关图片如下：qq截图20130627114821.png

此主题相关图片如下：qq截图20130627101701.png

http://www.foxtable.com/help/topics/0326.htm

我想在表事件BeforeDeleteDataRow中实现这个功能，就是每当删除行的时候就提示用户这个对话框，而不是在删除这个按钮中去实现这个功能，因为这样的话，我有好多按钮，都要设置一遍的话太冗余了。

用系统命令吧

系统命令的能不能只对某个表有效。现在我用系统命令，但是点删除是触发鼠标所在焦点行的新增和删除事件。这样可能会造成误操作啊，比如我焦点停留在TabControl某个页签下，然后我切换页签，点另外一个删除按钮，这样就会将焦点处的行删掉，而不是当前页签的行，怎么解决？

 

参考我给你发的帮助连接,你代码放到哪里都通用的.

难道不能在表事件中初始化好这个操作吗？在按钮里面写的话我知道啊，就是想在表事件中初始化这个操作，因为删除的时候都会遇到啊。还请能够详细说明一下，不是很明白，如何在判断我正在删除的这个动作呢？

就是下面的这个代码（在表事件BeforeDeleteDataRow中），第一句不知道怎么写？

If （怎么写？）

    Dim str As String = "是否删除选定行?"
    If MessageBox.Show(str,"提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.No
        e.Cancel= True
    End If
End If

 参考： If e.DataRow IsNot Nothing

BeforeDeleteDataRow事件：

  If MessageBox.Show("是否删除选定行?","提示",MessageBoxButtons.YesNo,MessageBoxIcon.Question) = DialogResult.No
        e.Cancel= True
  End If

按钮代码:

if currenttable.current is nothing orelse Msgbox("是否删除选中行?",vbyesno+vbquestion,"提示") = vbno then return

currenttable.current.delete