以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]多出一个对话框?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=67751)

--  作者:liuxianjie1980
--  发布时间:2015/4/30 17:18:00
--  [求助]多出一个对话框?

“删除”按钮代码如下:

 

If Tables("仪器设备库").Current.Locked = False Then
    Dim Result As DialogResult
    Result = MessageBox.Show("您确定要删除吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
    If Result = DialogResult.Yes Then
        Syscmd.Row.Delete()
    Else
        Return
    End If
Else
    MessageBox.show("您无权进行此项操作!","提示")

 

执行结果:先弹出自己设定的对话框,点击yes后,又弹出一个对话框“是否删除选定行?”

 

怎么回事?

 

该窗口是模式窗口


--  作者:Bin
--  发布时间:2015/4/30 17:19:00
--  
Syscmd.Row.Delete()

改为

currenttable.current.delete

--  作者:狐狸爸爸
--  发布时间:2015/4/30 17:20:00
--  

或者:

 

表属性中设置中,有个删除行提示的属性,将其设置为False


--  作者:liuxianjie1980
--  发布时间:2015/4/30 17:24:00
--  
ok,谢谢!