nz [VBA]

option explicit

public sub nz_

  dim v1 as variant
  dim v2 as variant

  v2 = 33

  if isNull(v1) then
     msgBox("v1 is null")
  end if

  ' the first argument to nz would actually be supposed to be a variant...

  msgBox("v1: " & nz(v1, v2)) 
  msgBox("l: " & nz(l, 42)) ' l: 0

end sub