1998秋2009春江苏计算机二级VB试题汇总

1、1998年模拟考试试卷(本试卷考试时间为120分钟)第二部分Visual Basic程序设计一、选择题(21)一个对象可以执行的动作与可被对象识别的动作分别称为21。(A)事件、方法(B)方法、事件(C)属性、方法(D)过程、事件答案：B分析：(24)在调用过程时，下述说明中正确的是24。(A)只能使用Call语句调用 Sub 过程(B)调用 Sub 过程时，实在参数必须用括号括起来(C)在表达式中调用Function 过程时，可以不用括号把实在参数括起来(D)Function 过程也可使用Call语句调用答案：D分析：(25)在使用Visual Basic进行图形操作时，有关坐标系的说明中错

2、误的是25。(A)Visual Basic只有一个统一的、以屏幕左上角为坐标原点的坐标系(B)在调整窗体上的控件的大小和位置时，使用以窗体左上角为原点的坐标系(C)所有图形及Print方法使用的坐标系均与容器有关(D)Visual Basic坐标系的Y轴，上端为0，越往下越大答案：A分析：(27)设Mys1，Mys2均为字符串型变量，Mys1 "Visual Basic"，Mys2 "b"，则下面关系表达式中结果为True的是27。(A)Mid(Mys1,8,1)>Mys2(B)Len(Mys1)<>2*Instr(Mys1, &quo

3、t;l")(C)Chr(66) & Right(Mys1,4) "Basic"(D)InStr(Left(Mys1, 6), "l") + 60 > Asc(UCase(Mys2)答案：C分析：(28)在窗体单击事件中执行下面语句的正确结果是28。Print Format(1732.46, "+#,#0.0")(A)+1,732.5(B)1,732.5(C) +1,732.5(D)+1,732.4答案：C分析：(30)以下有关把数组作为形参的说明中错误的是30。(A)形参数组只能按地址传递(B)调用过程时，只需

4、把要传递的数组名填ru 实参表(C)使用动态数组时，可用ReDim语句改变形参数组的维界(D)在过程中也可用Dim语句对形参数组进行说明答案：D分析：二、填空题(1)运行下面的程序，单击窗体后在窗体上显示的内容是1；若将程序中的A语句与B语句的位置互换，再次执行程序，单击窗体后在窗体上显示的内容是2。Private Sub Command1_Click()Dim x, y As Integerx 1: y 0Do While x < 3x x + 1'B语句y y + x'A语句LoopPrint x, yEnd Sub答案：(1) 33(2) 35分析：(2)执行下面的

5、程序，单击窗体后在窗体上显示的第一行结果是1，第三行结果是_2_。Private Sub Command1_Click()Dim Mystr, MyStr1, Mystr2 As StringMyStr1 "B"For i 1 To 3Mystr2 LCase(MyStr1)MyStr1 MyStr1 & Mystr2Mystr Mystr & MyStr1Print MystrMyStr1 Chr(Asc(MyStr1) + i)Next iEnd SubiMyStr1MyStr2MyStr打印1BbBbBbBbC2cCcBbCcBbCcE3EecBbCc

6、EeBbCcEe答案：(1)Bb(2)BbCcEe分析：(3)运行下面的程序，当单击窗体时，窗体上显示的内容的第一行是1，第二行是2。Private Sub Test(x As Integer)x x * 2 + 1If x < 6 ThenCall Test(x)End Ifx x * 2 + 1Form1.Print xEnd SubPrivate Sub Form_Click()Test 2End Subx打印备注2一5二11二2323二23一4747一答案：(1)23(2)47分析：(5)当 Sub 过程Value形参表中存在ByVal关键字时，执行本程序，单击窗体，在窗体上显示

7、的第一行内容是1，第二行内容是(2)；若将形参表中的Byval关键字删除，再执行本程序，单击窗体后在窗体上显示的第一行内容是3，第二行内容是(4)。Private Sub Value(ByVal m As Integer, ByVal n As Integer)m m * 2n n - 5Print "m " m, "n " nEnd Sub Private Sub Form_Click()Dim x As Integer, y As Integerx 10: y 15Call Value(x, y)Print "x " x, &qu

8、ot;y " yEnd Subxymn打印101510152010m20 n10x10 y15xymn打印101510152010m20 n102010x20 y15答案：(1)m20 n10(2)x10 y15(3)m20 n10(4)x20 y10分析：(6)图1、图2是应用程序的部分界面。运行程序首先出现图1的对话框，要求用户输入口令，输入完毕单击“确定”。如果输入的口令正确，则显示图2的画面；如果输入的口令错误，则出现图3的信息框。单击“取消”按钮，则结束程序。图1Private Sub Command1_Click()Dim passwor As Stringpasswor

9、d Text1.TextIf password "Myname" Then1Form1.ShowElsed MsgBox(2)RefreshEnd IfEnd SubPrivate Sub Command2_Click()3End Sub图1图2图3图1的窗体中，文本框对象的名称属性是4；PasswordChar属性取值是5；命令按钮Command1的Default属性取值是6。答案：(1)Unload Me(2) "口令非法！",vbOKOnly, "学生管理信息系统"(3)End(4)Text(5)*(6)True分析：(7)本程

10、序用于验证一个自然数n的立方等于n个连续的奇数之和。其中最大的奇数P n(n+1) -1。例如，43 19+17+15+13，最大奇数等于19。图4是本程序的运行界面。图4Dim n As IntegerPrivate Sub Command1_Click()Dim hum As Long, p As Integer, x As StringIf Text1.Text <> "" And IsNumeric(Text1.Text) Thenn 1num n * n * nText2*Text 2p n * (n + 1) - 1x x & Str(p)

11、& "+"For i 1 To n - 23x x & Str(p) & "+"Next ip p - 2x 4Text3.Text xElsePrint MsgBox("数据错误!", 48, "VB试题")End IfEnd SubPrivate Sub Command2_Click()If Text1.Text <> "" Then Text1.Text ""If Text2*Text <> "" Th

12、en Text2*Text ""If Text3.Text <> "" Then Text3.Text ""End SubPrivate Sub Command3_Click()EndEnd Sub图4的窗体中，命令按钮“验证”和“清除"的名称属性分别是5和6。答案：(1)Text1.Text(2)str(num)(3)pp-2(4)x & Str(p)(5)Command1(6)Command2分析：(8)本程序是一个可进行多数制转换的应用程序。图下是其运行界面。图5Option ExplicitDim

13、 x As Integer'将十进制数转换成二进制数的过程Private Function Covert(x As Integer) As StringDim r As Integer, i, n As Integer, cov, c As Stringr x Mod 2Do While1cov cov & Str(r)2r x Mod 2LoopFor i 3To 1 Step -1c c & Mid(cov, i, 1)Next iCovert cEnd FunctionPrivate Sub Command1_Click()If Text2.Text <&g

14、t; "" Then Text2.Text ""x 4Text2.Text Covert(x)End SubPrivate Sub Command2_Click()If Text2.Text <> "" Then Text2.Text ""x Val(Text1.Text)Text2.Text Oct(x)End SubPrivate Sub Command3_Click()If Text2.Text <> "" Then Text2.Text ""x

15、 Val(Text1.Text)Text2.Text Hex(x)End SubPrivate Sub Command4_Click()EndEnd Sub图5的窗体上，文本框对象Text1的Alignment取值是5，MuiLine属性取值是_6。答案：(1)x>1(2)xx2(3)Len(cov)(4)Val(Text1.Text)(5)1-Right(6)True分析：要读懂该程序，首先要具备十进制数转换成二进制数的知识，然后要掌握取整运算符“”和取模运算符“Mod”的使用方法。这样，才能对其进行分析。子函数Covert()的前部分是得到十进制数除2的余数字符串cov，后部分是将c

16、ov内容的顺序颠倒过来。十进制数转换成十六进制数和八进制数的过程是调用内部函数Hex(x)和Oct(x)。1999(秋)考试试卷第二部分Visual Basic程序设计一、选择题(用答题卡答题，答案依次填在21-30答题号内)(21)Visual Basic是一种面向21的程序设计语言。(A)过程(B)用户(C)方法(D)对象答案：D分析：(22)一只白色的足球被踢进球门，则白色、足球、踢、进球门是22。(A)属性、对象、方法、事件(B)属性、对象、事件、方法(C)对象、属性、方法、事件(D)对象、属性、事件、方法答案：B分析： (24)窗体Forml的名称属性是frm，它的Load事件过程名

17、是24。(A)Form.Load(B)Forml_Load(C)frm_koad(D)Me_Load答案：A分析：(25)在语句Public Sub Sort(i As Integer)中i是一个按25传递的参数。(A)地址(B)值(C)变量(D)常量答案：A分析：(26)x+y小于10且x-y大于0的逻辑表达式是26。(A)x+y<10 Or x-y>0(B) (x+y<10) (x-y)>0(C)x+y<10Andx-y>0(D) x+y<10 .And. x-y>0答案：C分析：(27)在Form_Click事件中执行如下语句的正确结果是2

18、7。Print Format(1236.54, "+#，#0.0")(A)123456(B)+123,654.0(C)+123,6.54(D)+123,654答案：B分析：(28)代数表达式，对应Visual Basic表达式是28。(A)E(x+y)+|x+y|1/2/2+1(B)Exp(x+y)+Sqr(Abs(x+y)/2*3.14159+1(C)(Exp(x+y)+Sqr(Abs(x+y)/(2 * 3.14159+1)(D)(Exp(x+y)+Sqr(Abs(x+y)/2*+1答案：C分析：(29)要对顺序文件进行写操作，下列打开文件语句中正确的是29。(A)Op

19、en "file1.txt" For Output As #1(B)Open "file1.txt" For Input As #1(C)Open "file1.txt" For Random As #1(D)Open "file1.txt" FOr Binary As #1答案：A分析：(30)有变量定义语句Dim a, b As Integer,变量a的类型和初值是30。(A)Integer,0(B)Variant,空值(C)String, " "(D)Long,0.0答案：B分析：二、填空

20、题(请将答案填写在答题纸的相应答题号内，每个答案只占一行)(1)运行下面的程序，单击窗体后在窗体上显示的第一行结果是1；第二行结果是 2；第三行结果是3。Private Sub Form_Click()Dim i As Integer, s As IntegerFor i 1 To 10s s + iIf s > 10 ThenPrint ss 0End IfNext iEnd Subis打印112336410515150667131308891717010答案：(1)15(2)13(3)17分析：(2)运行下面的程序，单击窗体后在窗体上显示的内容是1；若将程序中的A语句与B语句的位置互

21、换，再次执行程序，单击窗体后在窗体上显示的内容是2。Private Sub Form_Click()Dim a As Integer, b As Integera 0: b 0Do While a < 8a a + 2'A语句b b + a * a 'B语句LoopPrint a, bEnd Sub答案：(1) 10220(2) 10120分析：(3)运行下面的程序，单击窗体后在窗体上显示的第一行结果是(1)，第二行结果是(2)。Private Function digit(n As Integer, k As Integer) As Integerdigit 0Do W

22、hile k > 0digit n Mod 10n n 10k k - 1LoopEnd FunctionPrivate Sub Form_Click()Print digit(1234, 2)Print digit(1234, 3)End Subnkdigit 打印12342012314120331234301232412131022答案：(1)3(2)2分析：(4)运行下面的程序，单击窗体后在窗体上显示的第一行结果是1，第三行结果是2。Private Sub Form_Click()Dim mst As String, mstl As String, mst2 As StringDi

23、m i As Integermstl "CeBbAa"For i Len(mstl) To 1 Step -2mst2 Mid(mstl, i - 1, 2)mst mst & mst2Print mstNext iEnd Submstlmst2msti打印CeBbAaAaAa6AaBbAaBb4AaBbCcAaBbc2AaBbc答案：(8) Aa(9) AaBbCe分析：(5)运行下面的程序，单击窗体后在窗体上显示的第一行结果是1，第三行结果是。2。Private Sub Test(x As Integer)Dim i As IntegerIf x <>

24、; 0 ThenCall Test(x - 1)For i 1 To xPrint x;Next iPrintEnd IfEnd SubPrivate Sub Form_Click()Test 3End Subix打印备注03一2二1三0四11三22 2二33 3 3一答案：(1)1(2) 333分析：空打印Print操作是换行。(6)运行下面的程序，单击窗体后在窗体上显示的第二行结果是1，第四行结果是2。Dim y As IntegerPrivate Sub Form_Click()Dim x As Integerx 1: y 1Print "x1" x, "y

25、1" yTestPrint "x4" x, "y4" yEnd SubPrivate Sub Test()Dim x As IntegerPrint "x2" x, "y2" yx 2: y 3Print "x3" x, "y3" yEnd SubX(主)X(子)y打印11X10y110x20y2123X32y33X41y43答案：(12) x20y21(13) x4ly43分析：(7)图1是应用程序的窗体，要求用户选中复选框ChkBold后，文本框TxtDispl

26、ay中的文字以粗体显示，选中复选框Chkltalic后，文本框TxtDisplay中的文字以斜体显示，单击关闭按钮CmdClos$结束应用程序运行。图1Private Sub Check1_Click()If1ThenText1.FontBold TrueElseText1.FontBold 2End IfEnd SubPrivate Sub Check2_Click()If3ThenText1.FontItalic FalseElseText1.FontItalic TrueEnd IfEnd SubPrivate Sub Command1_Click()4MeEnd Sub答案：(1) C

27、heck1.Value 1(2) False(3) Check2.Value 0(4) Uuload*分析：(8)验证如下命题：设n是一个两位数，s1是n的各位数字之和，s2是2n的各位数字之和。若s1 s2，则n是9的倍数。根据图2和程序填写对象的相关属性，"X"表示对象无该属性。图2对象名称(Name)标题(Caption)正文(Text)窗体Frm1(1)X标签LblInput(2)X文本框TxtInputX空判断按钮(3)验证X退出按钮CmdExit退出XPrivate Sub CmdVerify_Click()Dim n As Integer, s1 As Int

28、eger, s2 As Integern Val(4)s1 Sm(n)s2 Sm(2 * n)If5ThenMsgBox "该命题成立"ElseMsgBox "该命题不成立"End IfTxtInput.Text ""TxtInput.SetFocusEnd SubPrivate Sub CmdExit_Click()Unload MeEnd SubPrivate Function Sm(6) As IntegerDim sm1 As Integersm1 0Do While n <> 0sm1 sm1 + n Mod 1

29、07LoopSm sm1End Function答案：(1) 验证命题(2) 输入一个两位数(3) CmdVerify(4) TxtInput.Text(5) s1 s2 And n Mod 9 0(6) ByVal n As Integer(7) n n 10分析：(9)本程序从键盘读人n个整数x1，x2，xn，若这些整数满足如下条件之一：(1)x1<x2<<xn;(2)x1<x2<<xj 且xj>xj1>xj2>>xn，其中1<j<n；(3)x1>x2>>xn。则输出“符合条件!”，否则，输出“不符合

30、条件!”。Private Sub Form_Click()Dim a() As IntegerDim i As Integer, j As Integer, n As Integern InputBox("输人数据个数")1For i 1 To na(i) InputBox("输人数据")Next iFor i 1 To n - 1If a(i) > a(i + 1) Then Exit ForNext iFor j i To n - 1If2Then Exit ForNext jIf3ThenPrint "符合条件!"Else

31、Print "不符合条件1"End IfEnd Sub答案：(1) ReDim a(n)(2) a(j) < a(j + 1)3j>n-1 或 j=n 分析：(10)在C盘根目录下有一数据文件(Cj.dat)，内容如下：9901,56,789902,97,899903,67,759904,78,769905,100,90第一列数据表示学号，第二列数据表示数学成绩，第三列数据表示语文成绩，要求根据学号计算学生的总分，并按总分从高到低次序在窗体上输出。现有程序如下：Dim a(5, 4) As IntegerPrivate Sub Form_Click()Dim i

32、 As Integer, j As IntegerOpen "c:cj.dat" For Input As #1For i 1 To 5For j 1 To 31Next j2 a(i, 2) + a(i, 3)Next iSortFor i 1 To 5For j 1 To 4Print a(i, j);Next jPrintNext iClose #1End SubPrivate Sub Sort()Dim i As Integer, j As Integer, k As Integer, temp As IntegerFor i 1 To 4For j i + 1 T

33、o 5If a(i, 4) < a(j, 4) ThenFor k 1 To3temp a(i, k)a(i, k) a(j, k)a(j, k) tempNext kEnd IfNext jNext iEnd Sub答案：(28) Input #1, a(i, j)(29) a(i, 4)(30) 4分析：空打印Print操作是换行。2000年(春)考试试卷一、选择题(用答题卡答题，答案依次填在21-30答题号内)(21)Visual Basic是用于开发21环境下的应用程序的工具。 (A)DoS(B)Windows(C)DoS和Windows(D)Unix答案：B (22)Visua

34、l Basic程序设计时常用的Print、Cls属于22。(A)属性(B)对象(C)方法(D)事件答案：C(23)一个可执行的Visual Basic的应用程序至少要包括一个23。(A)标准模块B)类模块(C)窗体模块(D)辅助模块答案：C(24)在Visual Basic中最基本的对象是24，它是应用程序的基石。(A)标签(B)窗体(C)文本框(D)命令按钮答案：B(26)执行语句"Print Format(5459.478, "#,#0.00")"，正确的输出结果是26。 (A)5459.48B)5，459.48(C)5，459.478(D)5，45

35、9.47答案：B (27)下列语句中的27语句可以用来正确地声明一个动态数组。(A)Private A(n) As Integer(B)Dim A() As Integer(C)Dim A(,) As Integer(D)Dim A(1 to n)答案：B(28)如果要在两个菜单命令项之间加一条分隔线，可在标题文本框中键入28。(A)-(B)+(C)&(D)#答案：A二、填空题(请将答案填写在答题纸的相应答题号内，每个答案只占一行)(1)执行下面程序，第一行输出结果是1，第二行输出结果是2。Private Sub Form_Click()Dim a As Integer, b As I

36、ntegera 1: b 0Do While a < 5b b + a * aa a + 1LoopPrint aPrint bEnd Subab打印1021+0*0131+2*2545*3*314514+4*430630+5*555655答案：(1)6(2)55分析：(2)执行下面程序，第二行输出结果是1，第三行输出结果是2。Private Sub Form_Click()Dim ch As String, i As Integerch "ABC"For i 1 To 3ch Mid(ch, 2 * i - 1, 1) + Left(ch, Len(ch)Print

37、 chNext iEnd Subchi打印ABC1Mid("ABC",1,1) +Left("ABC",3)"A”+”ABC"AABCAABC2Mid("AABC",3,1) +Left("AABC",4)"B"+"AABC"BAABCBAABC3Mid("BAABC",5,1) +Left("BAABC",5)"C"+"BAABC"CBAABCCBAABC答案：(1) BAA

38、BC(2) CBAABC分析：(3)执行下面程序，第一行输出结果是1，第二行输出结果是2(Ubound函数返回指定数组维的维上界)。Private Sub Form_Click()Dim i As Integer, j As IntegerDim m As Integer, n As IntegerDim a() As IntegerCall Arry(a)n UBound(a, 1): m UBound(a, 2)For i 1 To mFor j 1 To nPrint a(i, j);Next jPrintNext iEnd SubPrivate Sub Arry(b() As Inte

39、ger)Dim i As Integer, j As IntegerReDim b(3, 3)For i 1 To 3For j 1 To 3b(i, j) i * 10 + jNext jNext iEnd Suba(b)mN打印11 12 1321 22 2331 32 333311 12 1321 22 2331 32 33答案：(1) 111213(2) 212223分析：空打印Print操作是换行。(4)执行下面程序，输出的第一行结果是1，第二行结果是2。Private Sub Form_Click()Dim a As Integer, b As Integera 1b 2Call

40、Procl(a, b)Print a, bEnd SubPrivate Sub Procl(ByVal c As Integer, ByVal d As Integer)Dim a As Integer, b As Integerc a + bd a - bPrint c, dEnd Suba(主)b(主)a(子)b(子)cd打印120012000 0000 0a(主)b(主)a(子)b(子)cd打印120012000 0121 2若将 Sub 语句改为：Private Sub Procl(Byval c As Integer,Byval d As Integer)那么，执行后第一行结果是3，

41、第二行结果是4。答案：(7)00(8)00(9)00(10) 12分析：(5)执行下面程序，结果是11；若将A语句替换为x 64，B语句替换为r8，则结果是12。Dim n As Integer, k As Integer, x As Integer, r As IntegerDim a(8) As IntegerPrivate Sub Conv(d As Integer, r, i)i 0Do While d <> 0i i + 1a(i) d Mod r: d d rLoopEnd SubPrivate Sub Form_Click()x 12'A语句r 2'B

42、语句Print Str(x); "(" Str(r); ") "If x 0 ThenPrint 0ElseCall Conv(x, r, n)For k n To 1 Step -1Print a(k);Next kPrintEnd IfEnd Sub答案：(11) 12(2) 1 1 00(12) 64(8) 1 0 0分析：空打印Print操作是换行。(6)根据下面图形界面(图2)和程序，填写对象的相关属性和程序中的相关语句，“X”表示对象无该属性。图2对象名称(Name)标题(Caption)窗体Frm1(1)标签Labl1(2)文本框Text1

43、X命令按钮(3)(4)Private Sub CmdEnd_Click()5End SubPrivate Sub Form_Click()Dim x As Integer, y As Integer, sum As Integerx 1: y 2Call Addition(6)Text1.Text sumEnd SubPrivate Sub Addition(n As Integer, m As Integer, sum As Integer)sum n + mEnd Sub答案：(1) 加法(2) 运行结果(3) CmdEnd(4) 结束(5) Unload Me(6) x, y, sum分

44、析：(8)本程序的功能是统计输入字符串中字母、数字和其他字符的个数。其中的vbCrLf为Visual Basic回车符与换行符。对象名称(Name)标题(Captioll)正文(Text)文本框1TxtInputX空文本框2TxtOutputX空命令按钮1CmdSut统计X命令按钮2CmdExit结束X图3Private Sub CmdExit_Click()Unload MeEnd SubPrivate Sub CmdSta_Click()Dim i As Integer, n1 As Integer, n2 As Integer, n3 As IntegerDim s As StringF

45、or j 1 To Len(TxtInput.Text)Select Case(22)Case "A" To "Z", "a" To "z"n1 n1 + 1Case(23)n2 n2 + 124n3 n3 + 1End SelectNext js "字母个数 " & Str(n1) & vbCrLfs s & "数字个数 " & Str(n2) & vbCrLfs s & "其他字符个数 " & S

46、tr(n3)25End Sub图3的窗体上，文本框对象txtinput的MuhiLine属性取值是26。答案：(22) Mid(TxtInput.Text, j, 1)(23) "0" To "9"(24) Case Else(25) TxtOutput.Text s(26) True分析：本题难点为Select CaseEnd Select多分支机构的使用。Case语句后的表达式有三种形式：To关键字，Is关系运算表达式，表达式列表。用Case Else来处理对上述表达式的值不匹配时的语句。采用文本框将计算结果s输出。当文本框对象MuhiLine属性取

47、值为"True"时，文本框按多行输出。(9)本程序的功能是在二维数组中查找鞍点元素，即该元素在所在行中为最大，且在所在列中为最小。在一个数组中可能存在，也可能不存在这样的元素。数组各元素的值从文件data.txt中读取。Private Sub Form_Click()Dim a(3, 3) As Integer, i As Integer, j As IntegerDim tllaxlrr As Integer, col As Integer, ng As IntegerOpen "c:cj.dat" For Input As #1For i 1 To

48、3For j 1 To 3Input #1, a(i, j)Print a(i, j);Next jPrintNext iFor i 1 To 3maxvr (27)col 1For j 2 To 3If maxvr < a(i, j) Thenmaxvr (28)col jEnd IfNext jFor j 1 To 3If maxvr > a(j, col) Then(29)Next jIf j > 3 ThenPrint "a(" i; "," col; ")" a(i, col)flg 1End IfIf(3

49、0)Then Print "鞍点元素不存在"Next iClose #1End Sub答案：(27) a(i, 1)(28) a(i, j)(29) Exit For(30) flg 0分析：对二级等级考题中，二维数组就为最难的了。对打开文件的操作在本题中只是将数据读入数组，其重点在于对数组的行和列进行操作。为行中找最大值，采用数组a(定值，变量)的形式，设第一列值为初值。逐列比较后得行最小值maxvr后，采用数组a(变量，定值)形式，再从列中逐行比较后得列最小值。本程序中使用了两个技巧，其一利用循环变量值与循环终值比较来判断循环是否正常退出。例如当条件“j > 3”，因为前段程序的循环中，j的终值为3。循环结束后，循环变量j的值应为终值+步长，否则为非正常退出，j记录了退出时的循环次数；其二是使用标记变量flg。一般做法就是，先将其设置flg0，在需要做记号处再将flg1，然后在程序结束前来检查flg的值。空打印Print操作是换行。二、填空题(请把答案填写在答题纸的相应答题号