How to convert numbers in date format? VB.Net Code for begginers

In this post I would like to write about How to convert the numbers in date format. Converting integers in date format is very easy.Suppose you want to convert a string i.e 12022013 into date the result would be 12/02/2013 (dd/MM/yyyy) for  conversion of string into date format, I will create a function and whenever I need to convert the string into date format I will recall that function. The VB Code for that function will be as under.

'Purpose : This method would convert number format date data into date.

'Parameters : Number format string would be passed. Eg: 12022013

'Return Value : Date. Eg: 12/02/2013

Public Function Number2Date(ByVal lNum As Long) As Date

        Dim strNum As String = CStr(lNum)

        Dim iDay, iMon, iYear As Integer

        Dim ValidDate As Date

         Try

            'If date is not in valid format

            If strNum.Length = 7 Then

                strNum = "0" + strNum

            End If

            iMon = CInt(strNum.Substring(0, 2))

            iDay = CInt(strNum.Substring(2, 2))

            iYear = CInt(strNum.Substring(4, 4))

            ValidDate = New Date(iYear, iMon, iDay)

        Catch ex As Exception

            ex.Message

        End Try

         Return ValidDate

    End Function