オブジェクト変数またはWithブロック変数が設定されていないエラー

Question

私はASP.NET 4/VB.NETで書いています。私はMSSQLデータベースを照会しており、結果が返ってこないレコードがあることがあります。その結果、If..Else節の結果を呼び出して、データベースに結果が返ってきた場合にデフォルト値を設定します。 ..しかし、今私はこの "オブジェクト変数またはWithブロック変数が設定されていないエラー"を取得しています。関連するコードは次のとおりです。

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年の変数は設定されていますか？ nullでもかまいませんか？

あなたが今年引くしたい場合は、単に行うことができます：

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