vb6日期算法和vb.net等效程序

我在

vb6

中继承了以下代码：

Dim countDate As Date

countDate = Date - 1

这是从

countDate

变量中减去一天还是完全不同的

---

另外，如果我想将其更改为vb.net，那么等效的是什么？

countDate=Date-1

不会编译，因为Date是一种类型

countDate=countDate.AddDays（-1）

如果我没记错的话，您在VB6中使用了

DateAdd

函数来操作日期。我不知道算术运算符是否重载，但就像已经说过的，

Date

是一个类型，而不是一个对象，所以它不会编译。如果您想获取当前日期，您可以使用类似于

DateValue（Now）

的内容。这是我的想法，但是这是从运行在实时服务器上的工作应用程序中获得的代码。有没有什么奇怪的魔法可以让这个程序以某种方式编译？VB6 Date函数返回当前日期，与Now.Date相同。减去1产生前一天。所以它是Dim countDate=Now.Date.AddDays（-1）@all vb6 haters:是的，vb6没有那么糟糕…

countDate=Date-1

不会编译，因为Date是一种类型

countDate=countDate.AddDays（-1）

如果我没记错的话，您在VB6中使用了

DateAdd

函数来操作日期。我不知道算术运算符是否重载，但就像已经说过的，

Date

是一个类型，而不是一个对象，所以它不会编译。如果您想获取当前日期，您可以使用类似于

DateValue（Now）

的内容。这是我的想法，但是这是从运行在实时服务器上的工作应用程序中获得的代码。有没有什么奇怪的魔法可以让这个程序以某种方式编译？VB6 Date函数返回当前日期，与Now.Date相同。减去1产生前一天。所以它是Dim countDate=Now.Date.AddDays（-1）@所有vb6仇恨者：是的，vb6没有那么糟糕。。。