Problem med att konvertera

	if IsEmpty(rs("SumOfQuantity")) And Cint(rs("Budget")) <> 0 then
		tabell(i,3) = "<font size='1'><p align=right>" & CInt(rs("Budget")) & "</font>"
	elseIf Not IsNull(rs("Budget")) OR Not IsNull(rs("SumOfQuantity")) Then
	[B]if (CInt(rs("Budget")) - CInt(rs("SumOfQuantity"))) <> 0 then[/B]
		tabell(i,3) = "<font size='1'><p align=right>" & Cdbl(rs("Budget")) - Cdbl(rs("SumOfQuantity")) & "</font>"
	End If
	End if

Den markerade satsen ger felmedelandet:
Microsoft VBScript runtime (0x800A005E)
Invalid use of Null: 'Cint'

Och det borde den inte göra efter som att jag har satt vilkoret IsNull över?!?

byt or mot and