Foxtable(狐表)用户栏目专家坐堂 → 本人小白特来请教写一个代码 多条件检查后保存数据


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

主题:本人小白特来请教写一个代码 多条件检查后保存数据

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


加好友 发短信
等级:幼狐 帖子:139 积分:1145 威望:0 精华:0 注册:2016/11/22 8:50:00
本人小白特来请教写一个代码 多条件检查后保存数据  发帖心情 Post By:2017/1/7 13:59:00 [只看该作者]

本人小白特来请教写一个代码
--------------------------------
窗口1
话务类型: DropBox1
来电号码:TextBox3
是否派单:ComboBox1
派单工单号:TextBox8
提交:Button7
-------------------------------
要求:

Button7 单击事件

校验1:
如果 TextBox3 没填写内容 则提示:请填写来电号码
如果 TextBox3 有填写内容但不是11位电话号码 则提示:请填写正确的来电号码

校验2:

如果 是否派单:ComboBox1 内容 = 是  则

    继续校验  DropBox1 内容选择是 报故障 或 催故障 则检查 派单工单号 内容是否为空
        空则提示:请填写派单工单号
        非空则检查:内容是否为 JKTX开头的18位 内容
            如果 是 则 保存 表A当前行
            如果 否 则提示:请填写正确的派单工单号
    如果 DropBox1 内容选择是 催安装 或 催迁移 则检查 派单工单号 内容是否为空
        空则提示:请填写派单工单号
        非空则检查:内容是否为 大于20位 内容
            如果 是 则 保存 表A当前行
            如果 否 则提示:请填写正确的派单工单号

如果 是否派单:ComboBox1 内容 = 否  则 保存 表A当前行


 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111419 积分:567171 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2017/1/7 15:20:00 [只看该作者]

1、通过控件值判断

With e.Form.Controls("TextBox3")
    
If .Value Is Nothing Then
        msgbox("
请填写来电号码")
        return 
    End If
End
 With

2、如果是绑定的,通过绑定的行判断


 回到顶部