public function gg (optional byval v as integer = 33) as integer
dim je as integer = 22
gg = v + 1
return je = 22
end function
msgbox(gg())