Foxtable(狐表)用户栏目专家坐堂 → 提示的意思是什么?


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

主题:提示的意思是什么?

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


加好友 发短信
等级:童狐 帖子:265 积分:1837 威望:0 精华:0 注册:2012/11/6 17:17:00
提示的意思是什么?  发帖心情 Post By:2012/12/9 14:09:00 [显示全部帖子]

在客体中报错,谁能帮我说明一下这个报错是哪个问题?
图片点击可在新窗口打开查看此主题相关图片如下:qq截图20121209140731.png
图片点击可在新窗口打开查看

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


加好友 发短信
等级:童狐 帖子:265 积分:1837 威望:0 精华:0 注册:2012/11/6 17:17:00
  发帖心情 Post By:2012/12/9 15:41:00 [显示全部帖子]

多谢林总,一针见血,问题解决了

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


加好友 发短信
等级:童狐 帖子:265 积分:1837 威望:0 精华:0 注册:2012/11/6 17:17:00
  发帖心情 Post By:2012/12/9 15:52:00 [显示全部帖子]

林总,再问一个问题,如果判断一个日期输入控件不为空的话,代码这样写就报上面的错误,那我应该怎么样判断?

 

Dim bm As WinForm.ComboBox = e.Form.Controls("部门")
Dim xm As WinForm.ComboBox = e.Form.Controls("姓名")
Dim lsfs As WinForm.TextBox = e.Form.Controls("联系方式")
Dim ccrc As WinForm.DateTimePicker = e.Form.Controls("出差日期1")
If bm.Text<>"" And xm.Text<>"" And lsfs.Text <> "" And lsfs.Value <> "" Then
    DataTables("出差申请表").Save
    If DataTables("出差申请表").HasChanges Then
        DataTables("出差申请表").Save
    End If
    Forms("出差申请系统").Close
    DataTables("出差申请表").AllowEdit = False
Else
    MessageBox.Show("请确认必填项;部门 / 申请人姓名 / 联系方式 / 不为空","检查",MessageBoxButtons.OK,MessageBoxIcon.Error)
End If


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


加好友 发短信
等级:童狐 帖子:265 积分:1837 威望:0 精华:0 注册:2012/11/6 17:17:00
  发帖心情 Post By:2012/12/9 17:51:00 [显示全部帖子]

喔喔,林总今天休息去了.....


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


加好友 发短信
等级:童狐 帖子:265 积分:1837 威望:0 精华:0 注册:2012/11/6 17:17:00
  发帖心情 Post By:2012/12/10 7:36:00 [显示全部帖子]

呵呵,多谢师兄,上面的代码是有点重复了,按你的方法还是没有实现对比


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


加好友 发短信
等级:童狐 帖子:265 积分:1837 威望:0 精华:0 注册:2012/11/6 17:17:00
  发帖心情 Post By:2012/12/10 8:51:00 [显示全部帖子]

多谢 林总,解决了

 回到顶部