Determine value od "A"
dim a as string
dim num1 as integer, num2 as long
num1=5
num2=10
if num1<=5 then
if num2>12 and num2<20 then
a="choice1"
else
if num2<8 and num2>5 then
a="choice2"
else
if num2>8 and num2 <13 then
a="choice3"
end if
end if
end if
else
if num2=10 then a="choice4"
end if