Функция:
Public Shared Function ConvertoDate(ByVal dateString As String, ByRef result As DateTime) As Boolean
Try
Dim supportedFormats() As String = New String() {"MM/dd/yyyy"}
result = DateTime.ParseExact(dateString, supportedFormats, System.Globalization.CultureInfo.CurrentCulture, System.Globalization.DateTimeStyles.None)
Return True
Catch ex As Exception
Return False
End Try
End Function
Дата Строка
Dim FlightDateArriveString As String = (FlightMonthArrive.SelectedValue.ToString & "/" & FlightDayArrive.SelectedValue.ToString & "/" & "2010")
*ConvertoDate(FlightDateArriveString)*
Сообщение об ошибке отображается в строке выше ^ и гласит:
"Аргумент не указан для результата параметра публичной общей функции ConvertoDate (datestring как String, ByRef - как date) как Boolean"