超级变态的题目，看看大家可以得几分（不用qb做试验）

1.有这样一段代码
dim f as syring*12
f="ff"
print asc(mid$(f,3,1))
结果会输出多少

2.有这样一段代码
if 3>5 then print "f"
print "f"
结果是什么
那么if 3>5 then print "f":print "f"呢

3.有这样一段代码
a=3
for i=1 to a
a=5
print "f";
next
结果会输出什么

4.有这样一段代码
do while 2>1
print "f";
loop while 3>1
这段代码有错误吗

5.有这样一段代码
for i=1 to 5
    dim f as integer
next
这段代码有错误吗

6.已知i%=5/2   i=2
那么i%=15/2    i=?

7.有这样一段代码
if 2<1 then if 2>1 then print 1 else print 2
结果会输出多少

8.有这样一段代码
print "ff"
cls:
end
屏幕上会出现什么

9.有这样一段代码
::::::::::::::print ":"::::::::::
这段代码有错误吗

10.有这样一段代码
declare sub k()
k:
end
sub k
    print "f"
end sub
屏幕上会出现什么

附加题
I.有这样一段代码
10 print "1"
5 print "2"
结果会输出什么

II.有这样一段代码
if 3>2 then :print "ff":end if
这段代码有错误吗

答案
1.32 2.f 什么也没有 3.fff 4.有 5.没有 6.2 8 7.什么也没有 8.什么也没有 9.没有 10.什么也没有 
I.
1
2
II.有