visual-studio-2010 - 文字列を日付に変換する

Question

これは私の VB.Net プロジェクト用です。このフェーズでは、Excel から VS2010 にデータをプルしています。

これには、文字列形式の日付 25.10.2013 があります。この日付をデータグリッドに追加したいのですが、「文字列 "" 25.10.2013" から型 'Date' への変換は有効ではありません」というエラーが表示されます。

以下の両方のコーディング (Function と While) を確認し、これを修正するための解決策を提供してください。

If DialogResult = Windows.Forms.DialogResult.OK Then
  Try
    Dim objreader As New System.IO.StreamReader(OpenDLG.FileName)
    linecount = 0
    dupord = 0
    nooford = 0

    While Not objreader.EndOfStream
        fallout = objreader.ReadLine
        If linecount >= 0 Then
          If fallout = "" Then
              Exit While
          End If
        ' Dim tmpArray() As String = Regex.Split(Trim(velocityfallout), " ")
          Dim tmpArray() As String = Regex.Split(Trim(fallout), ",")
          If tmpArray(0) = "" Then
            Exit While
          End If
          pono = tmpArray(0)
          issue = tmpArray(1)
          falldate = getToday(tmpArray(3))
          ftype = "Velocity"
          checkfallout("Velocity", "", "", falldate, "", pono, "", issue, "")
          nooford = nooford + 1

       End If
      linecount += 1
    End While

GetToday 関数 :

Function getToday(ByVal dateStr As Date) As String

    Dim dateStrRet As String

    dateStrRet = CStr(DatePart("yyyy", dateStr)) & "-"

    If DatePart("m", dateStr) < 10 Then
        dateStrRet = dateStrRet & "0" & CStr(DatePart("m", dateStr)) & "-"
    Else
        dateStrRet = dateStrRet & CStr(DatePart("m", dateStr)) & "-"
    End If

    If DatePart("d", dateStr) < 10 Then
        dateStrRet = dateStrRet & "0" & CStr(DatePart("d", dateStr))
    Else
        dateStrRet = dateStrRet & CStr(DatePart("d", dateStr))
    End If

    Return dateStrRet
End Function