vb.net script ssis

the following code outputs the date as 021011 i need to change it to YYYYMMDD.

Thanks.

Dim sqlResult As OleDbDataReader
        sqlResult = sqlCommand.ExecuteReader()
        While sqlResult.Read()
            myYear = CStr(Year(sqlResult.GetDateTime(0))).Substring(2, 2)
            If Month(sqlResult.GetDateTime(0)) < 10 Then
                myMonth = "0" + CStr(Month(sqlResult.GetDateTime(0)))
            Else
                myMonth = CStr(Month(sqlResult.GetDateTime(0)))
            End If
            If Day(sqlResult.GetDateTime(0)) < 10 Then
                myDay = "0" + CStr(Day(sqlResult.GetDateTime(0)))
            Else
                myDay = CStr(Day(sqlResult.GetDateTime(0)))
            End If

            myDate = myDay + myMonth + myYear

Select allOpen in new window