主题：新版2014版在win8中不能正常使用的疑问

我在xp系统中开发的生产管理系统,一直运行正常,但今天我将电脑的操作系统升级到win8后,发现日期控件不能正常使用,主要表现是:我设计的是在窗口中根据日期控件中选择的日期值,去"倒班表"中查询某个班组某个日期应上的班次,然后将找到的班次放在窗口中的组合控件中,运行时,提示:"未认识的datetime格式,从11之后出现无法识别的字符",不知道是怎么回事?

两个系统日期格式不同

 Dim rq As WinForm.DateTimePicker = e.Form.Controls("日期")
    Dim bc As WinForm.ComboBox = e.Form.Controls("班次")
    Dim bz As WinForm.ComboBox = e.Form.Controls("班组")
    rq.value = Date.Today
    bz.value = "一班"
    Dim dnr As DataRow
    Dim dns As DataRow
    Dim nkr As Date = rq.value
    Dim nks As Date = nkr.AddDays(-1)
    Dim nkb As String = bz.value
    If nkb = "台包班" Then
        bc.value = "白班1"
    Else
        If nkb = "综合班" Or nkb = "部门" Then
            bc.value = "常白班"
        Else
            dnr = DataTables("倒班表").Find("日期 = #"& nkr &"# And 班组 = '"& nkb &"'","日期",0)
            dns = DataTables("倒班表").Find("日期 = #"& nks &"# And 班组 = '"& nkb &"'","日期",0)
这是我的程序代码,主要是在最后两行的查找中出现的问题,但我在WIN7中是能正常运行的,只有在WIN8.1操作系统中不能运行,应该如何解决呢?