Foxtable(狐表) → 用户栏目 → 专家坐堂 → 日期比较


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

主题：日期比较
帅哥哟，离线，有人找我吗？
q2520
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		日期比较  发帖心情 Post By：2018/6/25 8:20:00 [显示全部帖子]

我现在有2列  第一列的格式是  2018-06-25 08：00     第二列是时间格式    08:00
想要的效果是    第二列输入的时间必须大于第一列时间6小时以上才能输入   代码要怎么写？
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/25 10:00:00 [显示全部帖子]

谢谢老师  
如果时间列   只能用空格输入  不让手动写时间怎样实现
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/25 11:07:00 [显示全部帖子]

现在有2个问题   

If e.Col.name = "第二列" Then
    Dim d1 As Date = e.Row("第一列")
    d1 = new Date(1900, 1, 1, d1.Hour, d1.Minute, d1.Second)
    Dim d2 As Date = e.text
    d2 = new Date(1900, 1, 1, d2.Hour, d2.Minute, d2.Second)
    Dim sp As TimeSpan = d2-d1
    If sp.TotalHours < 6 Then
        e.cancel = True
        msgbox("不满足")
    End If
End If
单独用这个代码的时候  如果第二列时间输入不满足6小时提示正常  但是删除的话 就会报错

图片点击可在新窗口打开查看此主题相关图片如下：sj.png
图片点击可在新窗口打开查看
如果2个代码一起用     如果第二列输入错误   删除都删除不了

还有下面这个代码  还是可以输入
If e.Col.name = "二次时间" Then
           e.cancel = True
    End If


[此贴子已经被作者于2018/6/25 11:10:10编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/25 11:18:00 [显示全部帖子]

还有下面这个代码  还是可以输入
If e.Col.name = "二次时间" Then
           e.cancel = True
    End If
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/25 14:15:00 [显示全部帖子]

If e.Col.name = "二次时间" Then
           e.cancel = True
    End If
 地方没错  keydownEdit
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/25 14:25:00 [显示全部帖子]

这个改了  这个只是不会出现错误了        但是数字还是可以输入
能不能这一个也改进一下  输入时间不在范围  直接取消输入
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/30 8:46:00 [显示全部帖子]

 下载信息  [文件大小：   下载次数： ]
点击浏览该文件:时间.zip

老师给帮忙看一下   现在的问题有2个

 

1.二次时间那里还是可以手动输入时间  （希望是只能用空格输入时间） 

 如果输入的时间不在有效时间内  删除不了（只能全选然后空格删除，这样不符合平常的人的操作习惯，最好是输入的时间不在有效范围内 ，直接取消操作 为空）


2.日期和二次时间  两列的 时间如果跨度在2天里  计算就会出错  这个你试一下就知道了
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/30 15:34:00 [显示全部帖子]

老师  问题依旧

 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/6/30 16:27:00 [显示全部帖子]

就是正常添加     我试了很多遍   各种能遇到的情况都试了

第二条问题  还是那样跨2天的时间就不行  比方说  日期列是23:00  二次时间是07:20   还是提示时间不满足
 回到顶部
帅哥哟，离线，有人找我吗？
q2520
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：小狐 帖子：316 积分：2193 威望：0 精华：0 注册：2018/2/4 9:37:00 		  发帖心情 Post By：2018/7/1 7:57:00 [显示全部帖子]

现在只有一个问题了
正常操作的话  是不能手动输入时间    但是二次时间如果不满足时间出现提示以后   就可以手动修改了   要的效果就是时间不满足不记录必须时间够了才能输入  而且是禁止手动修改的    二次时间只能用空格输入

[此贴子已经被作者于2018/7/1 9:05:52编辑过]
 回到顶部
总数 22 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 6 次数据查询