option explicit
dim beforelife as location
dim afterlife as location
dim life as answer

-----------
private sub life_run()

if beforelife = afterlife then
answer.caption = "There is life after death."
end if

end sub