Foxtable(狐表)用户栏目专家坐堂 → 自定义用户


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

主题:自定义用户

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


加好友 发短信
等级:二尾狐 帖子:515 积分:5045 威望:0 精华:0 注册:2017/9/1 23:28:00
  发帖心情 Post By:2020/7/21 22:51:00 [显示全部帖子]

Dim Result As DialogResult
Result = MessageBox.Show("请确认删除吗?", "提示", MessageBoxButtons.YesNo, MessageBoxIcon.Question)
If Result = DialogResult.Yes Then
    Tables("users").Current.Delete 
    DataTables.Save()  
Else
  forms("用户管理").open()
End If

 回到顶部