2008年秋季江苏计算机二级VB考试答案

DCACD
AACBC
DDABB
BABCD
BADCD
AACBA

填空题
(1） 2
(2） 7
（3） 16 15 14 13
（4） 3 6
（5） 4 7
（6） 5 8 11
（7） 30
（8） 30
（9） 15
（10) 2 3
（11）5 8
（12 34 55
（13）icBa
（14）baicBa
（15）baba
（16） st = ""
（17） (-1) ^ (i - 1) / Val(st) 或 (-1) ^ (i + 1) / st
（18） UCase(p) = Mid(st, i, 1)
（19） CStr(i Mod 2) & h2b
（20） Right("0000" & h2b, 4)
（21） small & a(i)
（22） Mid(small, i, 1) <> "0"
（23） a(j) > a(j + 1)
（24） n As Long, a() As Integer 或 ByVal n As Long, a() As Integer
（25） n \ 10
（26） k = k + 1
（27） ReDim Preserve a(k + 1)
（28） p = 0
（29） a(i) = a(j)
（30） j = j + 1