标题：郁闷,换了操作系统后,代码执行出错(已解决）

我原用XP系统,现改用Vista系统,以下代码在XP系统上执行的好好的,但在Vista系统上却出现错误

      Dim d As Date = e.DataRow("日期")
If e.DataCol.Name = "日期" Then
    If e.NewValue <> Nothing Then
     e.DataRow("单号1") ="CK" & CStr(d).Remove(0,2).Remove(2,1).Remove(4,1)
     e.DataRow("单号2") =CInt("2" & CStr(d).Remove(0,2).Remove(2,1).Remove(4,3))
  End If
End If

提示索引和计数引用错误,真不明白

Vista系统是微软系统上最短命的操作系统之一，连微软都推荐升级成WIN7,FOXTABLE在WIN7上测试没有问题。

建议还是用XP或者升级

应该是操作系统日期格式设置问题。

是日期分隔符不同造成的。

请参考我以前发过的帖子：http://www.datasoft.com.cn/fox/dispbbs.asp?BoardID=2&ID=5593

已经将系统日期改格式 yyyy-m-d 但还是出现同样错误提示

怎么解决的啊

1、如果日期格式是2010/01/13 改成 yyyy-mm-dd
2、如果是2010-1-13 改成yyyy-mm-dd

也是机缘巧合，我想在笔记本电脑上装xp/Vista双系统，分区时不小心将分区表损坏，只有用电脑自带的一键恢复功能将系统重新恢复成Vista系统。
Vista系统恢复后，我先将日期格式改掉后，再加装其余的应用软件，装好狐表后，我再打开项目又试了一次，没想到竟然没有错误提示，检查执行结果，完全正确。
在重装系统之前yyyy-mm-dd、yyyy-m-d两种格式都试过，均不成功。