Question

所有

我是VB 2010的初学者。我正在处理与任务计划程序绑定的提醒，直到我开始处理“此时打开”这样的事情。无论如何，我希望它从文本文件中读取日期行，直到日期超过7天。它将自动读取任何非日期行，直到达到+ 7天。此外，我希望它可以使用任何日期格式mdy，dmy或ymd。

如果它在控制面板＆gt; Region my Home Country = United States和Short Date = yyyy-MM-DD中有所不同。

使用“将执行细节复制到剪贴板”我得到以下内容：

System.InvalidCastException was unhandled
HResult=-2147467262 
Message=Argument 'DateValue' cannot be converted to type 'Date'. 
Source=Microsoft.VisualBasic

当我跑步时：

        Dim regDate As Date = Date.Now()

        Dim Date1 As String = regDate.ToString("MM.dd.yyyy")
        Dim Date2 As String = regDate.ToString("MM-dd")
        Dim Date3 As String = regDate.ToString("dd-MM-yyyy")
        Dim Date4 As String = regDate.ToString("yyyy/MM/dd")

        Dim D1_plus_7 As String = DateAdd("d", 7, Date1)
        Dim D2_plus_7 As String = DateAdd("d", 7, Date2)
        'Dim D3_plus_7 As String = DateAdd("d", 7, Date3) '< I get the err here
        Dim D4_plus_7 As String = DateAdd("d", 7, Date4)

        Console.WriteLine(D1_plus_7)
        Console.WriteLine(D2_plus_7)
        'Console.WriteLine(D3_plus_7)
        Console.WriteLine(D4_plus_7)

注释的行是这样我可以确定在我收到错误后会起作用。哦，Date2只是检查它是否会起作用。

感谢任何帮助。谢谢伯比

“参数'DateValue'无法转换为'Date'类型”

0 个答案: