Problemer med søgning i database

Hej jeg har nogle linier i mit program der ser sådan ud...

Adodc5.RecordSource = "SELECT Sum([Pensionvognmand]) AS SumPvognmand FROM skatteoplysninger GROUP BY Year([Dato]), [Førernr] HAVING (((Year([Dato]))=Year(Date())) AND (([Førernr])='" & Førernr & "'))"
    Adodc5.Refresh
   
    If Adodc5.Recordset.Fields("sumPvognmand") & "" = "" Then
    Pvognmand = "0,00"
    Else
    Pvognmand = Round(Adodc5.Recordset.Fields("sumPvognmand") & "", 2)
    End If

Mit problem er at hvis den ikke finder noget i min database der svarer til det den søger efter så får jeg en fejl og programmet lukker ned, men jeg vil bare have at Pvognmand er 0,00 er der nogen der ved hvordan man får den til det...