Foxtable(狐表)用户栏目专家坐堂 → [求助]全局代码


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

主题:[求助]全局代码

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
[求助]全局代码  发帖心情 Post By:2019/12/13 13:45:00 [只看该作者]

老师好,求在操作表A时如果没有保存提示不能增加删除、上下移动等......。

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


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/13 15:52:00 [只看该作者]

到对应的添加BeforeAddDataRow,删除事件处理BeforeDeleteDataRow,移动BeforeMoveRow


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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/12/15 21:49:00 [只看该作者]

老师,对话框反了。


Dim Result As DialogResult
Result = MessageBox.Show("是否删除?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then

Tables("通讯录").Current.Delete
   
End If



图片点击可在新窗口打开查看此主题相关图片如下:image 2.png
图片点击可在新窗口打开查看
 

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


加好友 发短信
等级:七尾狐 帖子:1701 积分:11355 威望:0 精华:0 注册:2015/6/22 8:11:00
  发帖心情 Post By:2019/12/15 21:54:00 [只看该作者]

老师,好了。

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


加好友 发短信
等级:超级版主 帖子:106242 积分:540333 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/12/15 21:55:00 [只看该作者]

代码没有问题

 回到顶部