Поскольку True и False являются двоичными величинами, их оценивать проще, чем число 0. True и False можно использовать так:
Function ShowNumber(dblNumber as Double) as string
If dblNumber then
ShowNumber ="The number is " & dblNumber
Endlf
End Function