Foxtable(狐表)用户栏目专家坐堂 → 窗口主表代码验证保存问题.


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

主题:窗口主表代码验证保存问题.

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


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
窗口主表代码验证保存问题.  发帖心情 Post By:2020/11/25 16:05:00 [显示全部帖子]

帮忙看一下代码

窗口提交保存按钮代码,加了一个验证 (请假次数)=(已请假次数)的时候不能验证保存. 代码报错.
代码放在按钮的 Click 事件下
Dim dr As DataRow = e.DataRow
If dr("请假次数") = dr("已请假次数") Then
    Messagebox.show("请假次数已满,不能进行请假操作,请联系老师!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
Else If Tables("请假单_学生").Current IsNot Nothing Then
    Tables("请假单_学生").Current.Save()
    e.Form.Close()
End If

编译错误 "DataRow"不是"ControlEvenArgs"的成员.
错误代码
Dim dr As DataRow = e.DataRow
请问如何在窗口中定义数据,请指教.


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


加好友 发短信
等级:三尾狐 帖子:641 积分:4920 威望:0 精华:0 注册:2020/4/15 19:53:00
搞定,代码如下.谢谢  发帖心情 Post By:2020/11/25 19:09:00 [显示全部帖子]

If Tables("请假单_学生").Current("请假次数") = Tables("请假单_学生").Current("已请假次数") Then
    Messagebox.show("请假次数已满,不能进行请假操作,请联系老师!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
    e.Cancel = True
Else If Tables("请假单_学生").Current IsNot Nothing Then
    Tables("请假单_学生").Current.Save()
    e.Form.Close()
End If

 回到顶部