for i=1 to 6 if i =1 then x= i if i=4 then x=x+1

问题描述:

for i=1 to 6 if i =1 then x= i if i=4 then x=x+1
dim i as intenger,x as intenger
for i=1 to 6
if i =1 then x= i
if i=4 then x=x+1
else x=x+2
end if
next i
print x
end sub

c