- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 我都无语了 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=60865)
-- 发布时间：2014/12/2 18:32:00
-- 我都无语了
日新车队表里按月查找控件一点就死机,刚才还用的好好的,现在怎么点怎么死机密码158998
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:日新车队管理系统.foxdb |
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:日新车队数据库.rar |
-- 发布时间：2014/12/2 18:37:00
--
没有登录密码
-- 发布时间：2014/12/2 18:38:00
--
158998
-- 发布时间：2014/12/2 18:54:00
--
俺这里测试未发现异常
你是什么情况出现死机的？
-- 发布时间：2014/12/2 18:56:00
--
日新车队表里那个按月查找控件,一选2014年12月就弹出一个错误事件,就什么也点不了了
[此贴子已经被作者于2014-12-2 18:58:04编辑过]
-- 发布时间：2014/12/2 18:59:00
--
看图
此主题相关图片如下：qq图片20141202185915.png
-- 发布时间：2014/12/2 19:06:00
--
你用下面这个代码试试：
If e.Sender.Text.Contains("年") AndAlso e.Sender.Text.Contains("月")
Dim y As Integer = e.Sender.Text.Split("年")(0)
Dim m As Integer = e.Sender.Text.Split("年")(1).Split("月")(0)
Dim d1 As Date = new Date(y,m,1)
Dim d2 As Date = new Date(y,m,Date.DaysInMonth(y,m))
Tables("日新车队").Filter = "二保日期 >= #" & d1 & "# and 二保日期 <= #" & d2 & "#"
End If
-- 发布时间：2014/12/2 19:13:00
--
我测试没有问题。
-- 发布时间：2014/12/2 19:17:00
--
在我这怎么试怎么死机,我都晕了,刚才用好好的,现在怎么也不行
-- 发布时间：2014/12/2 19:20:00
--
不应该报错才对的，如果报错，就是此计算日期设置有问题。
电脑的日期设置，不要带有星期几那种 http://jingyan.baidu.com/article/466506580d7328f549e5f8bc.html