Foxtable(狐表)用户栏目专家坐堂 → [求助]多出一个对话框?


  共有2820人关注过本帖树形打印复制链接

主题:[求助]多出一个对话框?

帅哥哟,离线,有人找我吗?
liuxianjie1980
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
[求助]多出一个对话框?  发帖心情 Post By: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
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2015/4/30 17:19:00 [只看该作者]

Syscmd.Row.Delete()

改为

currenttable.current.delete

 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/4/30 17:20:00 [只看该作者]

或者:

 

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


 回到顶部
帅哥哟,离线,有人找我吗?
liuxianjie1980
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:633 积分:4016 威望:0 精华:0 注册:2015/1/27 9:34:00
  发帖心情 Post By:2015/4/30 17:24:00 [只看该作者]

ok,谢谢!

 回到顶部