friend function gg (option byval v as integer = 33) as integer
dim je as integer = 22
gg = v + 1
if 1 = 1 then
exit function
end if
return je
end function
msgbox(gg(31))