以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 日期出错提醒 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=72872) |
-- 作者:HJG_HB950207 -- 发布时间:2015/8/7 20:10:00 -- 日期出错提醒 请教老师: 表A,【入职年月】为字符型,掩码:####-##-## 在录入窗口,建一textBOX,绑定表A的【入职年月】,如何在录入出错时提醒 “日期错误”?(0<月<13,0<日<32)
|
-- 作者:有点蓝 -- 发布时间:2015/8/7 20:19:00 -- 参考这句 Dim d As Date \'变量d用于存储转换结果 If Date.TryParse("1999/12/31", d) Then \'如果转换成功 Output.Show(d) \'输出转换结果 Else Output.Show("无效日期格式") \'给出错误提示 End If
|
-- 作者:HJG_HB950207 -- 发布时间:2015/8/7 20:20:00 -- 谢谢老师! |
-- 作者:有点蓝 -- 发布时间:2015/8/7 20:20:00 -- 错误显示参考 |