Переменная объекта или с переменной блока не установлена ​​ошибка

Question

Я пишу в ASP.NET 4 / VB.NET. Я запрашиваю базу данных MSSQL и иногда возвращаю записи без результатов ... поэтому я приложил вызов, который я делал к результатам, в предложении If..Else для установки значения по умолчанию, если база данных возвращается без результатов. ..но теперь я получаю это "Переменная объекта или С переменной блока не установлена ​​ошибка". Вот соответствующий код:

Dim clcfirst
Dim rhcfirst
Dim clcdate As Date
Dim rhcdate As Date
If IsNothing(clcexists) Then
   clcfirst = Date.Now.Subtract(year)
   rhcfirst = Date.Now.Subtract(year)
   clcdate = clcfirst
   rhcdate = rhcfirst
Else
   clcfirst = clcexists.FirstOrDefault()
   rhcfirst = rhcexists.FirstOrDefault()
   clcdate = clcfirst.SignatureDate
   rhcdate = rhcfirst.SignatureDate
End If

Answer 1

Где устанавливается переменная года DateTime? Может ли это быть ноль?

Если вы хотите вычесть год, вы можете просто сделать:

 clcdate = Date.Now.AddYears(-1)
 rhcdate = Date.Now.AddYears(-1)