vb.net - 在vb中减去时间

Question

我想从 VB 日期对象中减去 18 年。
这是代码示例：

Dim someVar
DirectCast(pcontrol, DateTimePicker).Value = Date.Now.Subtract(someVar)

someVar 值是 ?

score 8 · Accepted Answer

这看起来很奇怪，但请尝试使用AddYears, 但使用负数：

With DirectCast(pcontrol, DateTimePicker)
  .Value = .Value.AddYears(-18)
End With

或者正如 MarkJ 指出的那样，试图从现在开始减去它：

With DirectCast(pcontrol, DateTimePicker)
  .Value = Now.AddYears(-18)
End With

1 回答 1