2011年秋江苏省计算机二级VB考试真题

End If End If

（30） Next i

If Len(tem) > 1 And Len(tem) > Len(sta) Then max_s = tem Else

max_s = sta End If End Function

2011年秋季江苏省高校计算机等级二级VB考试参考答案

(1)B (2)B (3)B (4)A (5)D (6)B(7)A (8)B (9)D (10)C

(11)C(12)D (13)A (14)D (15)B(16)D (17)C (18)D (19)C (20)C (21)A (22)B (23)B (24)C (25)B (26)B (27)B (28)C (29)D (30)A 二、填空题

(1)6 11 (2)10 21 (3)13 34(4)6 (5)8 (6)3 (7)2 (8)8 (9)32 (10)2 (11)16 (12)207(13)-27 (14)22 (15)-11(16)n=n+1 (17)abs(t)<=1e-7

(18)p*(2*i-1)/(2*i) (19)p=j*j (20)j=int(sqr(i))+1 或j>int(sqr(i))(21)int(sqr(x))=sqr(x)

(22)st=\(27)i+1 (28)rq(2)-1

(29)d+dt (30)n mod 4=0 and n mod 100<>0

2012年春计算机二级 参考答案 一、选择题：

1．D2．A3．C4．D5．B6．B7．A8．B9．A10．C11．C12．C13．C14．C15．C 16．C17．D18．D19．B20．C21．A22．B23．B24．A25．B26．C27．A28．B 29．D30．A 二、填空题：

（1）事件源（2）-3（3）Image（4）Binary（5）Value（6）2（7）十字形图形 （8）4（9）2（10）24（11）39 13 5（12）273 91 5（13）1（14）3

（15）55（16）11（17）ReDim s(k)（18）\（19）k=k-1（20）s=1（21）(-1)*k （22）fun1=1（23）k=2（24）c(k)=n（25）Loop（26）fun2=False（27）max_s(st) （28）Mid(st,i,1)（29）tem=\（30）s1=s2