dim seeTree as boolean = false
if seeTree then
dim poem as string = "this poem is as lovely as a tree"
end if