高分求08秋江苏省VB二级笔试答案！！！

最新公布：2008年秋 江苏省计算机二级 VB（Visual Basic） 答案
答案：
选择题
1 2 3 4 5 6 7 8 9 10
D C A C D A A C B C
11 12 13 14 15 16 17 18 19 20
D D A B B B A B C D
21 22 23 24 25 26 27 28 29 30
B A D C D A A C B A
填空题
（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）