[计算机类试卷]国家二级（VB）机试模拟试卷138及答案与解析.doc

1、国家二级（ VB）机试模拟试卷 138及答案与解析 一、选择题 1 下列关于栈叙述正确的是 ( )。 （ A）栈顶元素最先能被删除 （ B）栈顶元素最后才能被删除 （ C）栈底元素永远不能被删除 （ D）栈底元素最先被删除 2 下列叙述中正确的是 ( )。 （ A）在栈中，栈中元素随栈底指针与栈顶指针的变化而动态变化 （ B）在栈中，栈顶指针不变，栈中元素随栈底指针的变化而动态变化 （ C）在栈中，栈底指针不变，栈中元素随栈顶指针的变化而动态变化 （ D）以上说法都不正确 3 某二叉树共有 7个结点，其中叶子结点只有 1个，则该二叉树的深度为 (假设根结点在第 1层 )( )。 （ A） 3

2、（ B） 4 （ C） 6 （ D） 7 4 软件按功能可以分为应用软件、系统软件和支撑软件 (或工具软件 )。下面属于应用软件的是 ( )。 （ A）学生成绩管理系统 （ B） C语言编译程序 （ C） UNIX操作系统 （ D）数据库管理系统 5 结构化程序所要求的基本结构不包括 ( )。 （ A）顺序结构 （ B） COTO跳转 （ C）选择 (分支 )结构 （ D）重复 (循环 )结构 6 下面描述中错误 的是 ( )。 （ A）系统总体结构图支持软件系统的详细设计 （ B）软件设计是将软件需求转换为软件表示的过程 （ C）数据结构与数据库设计是软件设计的任务之一 （ D） PAD图是

3、软件详细设计的表示工具 7 负责数据库中查询操作的数据库语言是 ( )。 （ A）数据定义语言 （ B）数据管理语言 （ C）数据操纵语言 （ D）数据控制语言 8 一个教师可讲授多门课程，一门课程可由多个教师讲授。则实体教师和课程间的联系是 ( )。 （ A） l： 1联系 （ B） l： m联系 （ C） m： l联系 （ D） m： n联系 9 有三个关系 R、 S和 T如下： 则由关系 R和 S得到关系 T的操作是 ( )。 （ A）自然连接 （ B）并 （ C）交 （ D）差 10 定义无符号整数类为 UInt，下面可以作为类 UInt实例化值的是 ( )。 （ A）一 369 （

4、B） 369 （ C） 0 369 （ D）整数集合 1， 2， 3， 4， 5 11 VB中有这样一类文件：该文件不属于任何一个窗体，而且仅包含程序代码，这类文件的扩展名是 ( )。 （ A） vbp （ B） bas （ C） vbw （ D） frm 12 能够产生 1到 50之间 (含 1和 50)随机整数的表达式是 ( )。 （ A） Int(Rnd*51) （ B） Int(Rnd(50)+1) （ C） Int(Rnd*50) （ D） Int(Rnd*50+1) 13 要求如果 x被 7除余 2，则输出 x的值，下列语句中不能实现此功能的语句是( )。 （ A） If x mo

5、d 7=2 Then Print x （ B） If x一 (x 7)*7=2 Then Print x （ C） If x-(x/7)*7=2 Then Print x （ D） If x -Int(x/7)*7=2 Then Print x 14 表达式 Sgn(0 25)的值是 ( )。 （ A）一 1 （ B） 0 （ C） 1 （ D） 0 5 15 如下关于变体类型变量的叙述中，错误的是 ( )。 （ A）变体类型数组中只能存放同类型数据 （ B）使用 Array初始化的数组变量，必须是 Variant类型 （ C）没有声明而直接使用的变量其默认类型均是 Variant （ D）在

6、同一程序中，变体类型的变量可以被多次赋以不同类型的数据 16 满足下列条件之一的年份是闰年 ： 1)年份能被 4整除但不能被 100整除 2)年份能被 400整除 若 y代表年份，下面判断闰年的正确表达式是 ( )。 （ A） y Mod 4 And y Mod 100 Or y Mod 400 （ B） y Mod 4=0 Or y Mod 100 0 And y Mod 400=0 （ C） y Mod 100 0 And(y Mod 4=0 Or y Mod 400=0) （ D） y Mod 4=0 And y Mod 100 0 Or y Mod 400=0 17 以下关于键盘事件的

7、叙述中，错误的是 ( )。 （ A）按下键盘按键既能触发 KeyPress事件，也能触发 Key Down事件 （ B） KeyDown、 KeyUp事件过程中，大、小写字母被视作相同的字符 （ C） KeyDown、 KeyUp事件能够识别 Shift、 Ah、 Ctrl等键 （ D） KeyCode是 KeyPress事件的参数 18 以下关于窗体的叙述中错误的是 ( )。 （ A）窗体的 Hide方法将窗体隐藏并卸载 （ B）窗体的 Show方法可以将窗体装入内存并显示该窗体 （ C）若工程中包含 多个窗体，则可指定一个为启动窗体 （ D）窗体的 Load事件在加载窗体时发生 19 如果

8、在窗体模块中所有程序代码的前面有语句： Dim x，则 x是 ( )。 （ A）全局变量 （ B）局部变量 （ C）静态变量 （ D）窗体级变量 20 计算下面分段函数的正确语句是 ( )。 （ A） y=IIf(x 0， x+1， IIf(x 0， x-1， 0) （ B） y=IIf(x=0， 0， IIf(x 0， x-1， x+1) （ C） y=IIf(x 0， x+1， IIf(x 0， 0， x一 1) （ D） y=IIf(x=0， 0， x一 1， x+1) 21 以下关于事件、事件驱动的叙述中，错误的是 ( )。 （ A）事件是可以由窗体或控件识别的操作 （ B）事件可以由

9、用户的动作触发 （ C）一个操作动作只能触发一个事件 （ D）事件可以由系统的某个状态的变化而触发 22 i在窗体上画一个水平滚动条，其属性值满足 Min Max。程序运行后，如果单击滚动条右端的箭头，则 VMue属性值 ( )。 （ A）增加一个 SmallChange量 （ B）减少一个 SmallChange量 （ C）增加一个 LargeChange量 （ D）减少一个 LargeChange量 23 在菜单编辑器中建立如下图所示的菜单，并为每个菜单项编写了鼠标单击事件过程。 关于此菜单，以下叙述中错误的是 ( )。 （ A）针对此菜单进行操作，单击 “斜体 ”菜单项时，将执行它的鼠标

10、单击事件过程 （ B）针对此菜单进行操作，单击 “下划线 ”菜单项时， “”被去掉 （ C）针对此菜单进行操作，单击 “退出 ”菜单项时，不能执行对应的单击事件过程 （ D）针对此菜单进行操作，单击 “编辑 ”菜单项时，打开下拉菜单，但不执行相应的单击事件过程 24 以下关于通用对话框的 叙述中，错误的是 ( )。 （ A）在程序运行状态下，通用对话框控件是不显示的 （ B）通用对话框控件是 Visual Basic的标准控件 （ C）设计时，通用对话框控件的大小是固定的，不能改变 （ D）在同一个程序中，一个通用对话框控件可以作为打开、保存等多种对话框 25 设工程中有 Form1、 For

11、m2两个窗体，要求单击 Form2上的 Command1命令按钮， Form2就可以从屏幕上消失，下面的事件过程中不能实现此功能的是 ( )。 （ A） Private Sub Commandl_Click() Form2 Hide End Sub （ B） Private Sub Commandl_Click() Unload Me End Sub （ C） Private Sub Commandl_Click() Form2 Unload End Sub （ D） Private Sub Commandl_Click() Me Hide End Sub 26 向文本框中输入字符时，下面能够

12、被触发的事件是 ( )o （ A） GotFocus （ B） KeyPress （ C） Click （ D） MouseDown 27 若要把窗体上命令按钮 Commandl的状态设置为不可用，应该执行的命令是( )。 （ A） Commandl Enabled=False （ B） Commandl Visible=False （ C） Commandl Cancel=Fal8e （ D） Commandl Default=False 28 窗体上有一个名称为 Vscmul的滚动条，当用鼠标拖动滚动条中的滚动块时，触发的事件是 ( )。 （ A） Click （ B） KeyDown （

13、 C） DragDrop （ D） Scroll 29 关于 KeyPress事件，以下叙述中正确的是 ( )。 （ A）在控件数组的控件上按键盘键，不能触发 KeyPress事件 （ B）按下键盘上任一个键时，都能触发 KeyPress事件 （ C）按字母键时，拥有焦点的控件的 KeyPress事件会被触发 （ D）窗体没有 KeyPress事件 30 窗体上有一个名称为 Text1的文本框；一个名称为 Timerl的计时器控件，其Interval属性值为 5000,Enabled属性值是 True。 Timerl的事件过程如下： Private Sub Timerl_Timet() Sta

14、tic flag As Integer If flag=0 Then flag=1 flag=一 flag If flag=1 Then Text1 ForeColor=&HFF& HFF&为红色 Else Text1 ForeColor=&HCOOO& &HC000&为绿色 End If End Sub 以下叙述中正确的是 ( )。 （ A）每次执行此事件过程时， flag的初始值均为 0 （ B） flag的值只可能取 0或 1 （ C）程序执行后，文本框中的文字每 5秒改变一次颜色 （ D）程序有逻辑错误， Else分支总也不能被执行 31 为计算 1+2+22+23+24+2 10的值

15、，并把结果显示在文本框 Text1中，若编写如下事件过程： Private Sub Command1 Click() Dim a&， s&， k& s=1 a=2 For k=2 To 10 a=a*2 s=s+a Next k Text1 Text=s End Sub 执行此事件过程后发现结果是错误的，为能够得到正确结果，应做的修改是 ( )。 （ A）把 s=1改为 s=0 （ B）把 For k=2 To 10改为 For k=1 To 10 （ C）交换语句 s=s+a和 a=a*2的顺序 （ D）把 For k=2 To 10改为 For k=1 To 10、交换语句 s=s+a和

16、a=a*2的顺序 32 标准模块中有如下程序代码： Public x As Integer， Y As Integer Sub var_pub() x=10： Y=20 End Sub 在窗体上有 1个命令按钮，并有如下事件过程： Private SUb Commandl_Click() Dim x As Integer Call var_pub x=x+100 y=y+100 Print x； y End Sub 运行程序后单击命令按钮，窗体上显示的是 ( )。 （ A） 100 100 （ B） 100 120 （ C） 110 100 （ D） 110 120 33 设 a、 b都是自然

17、数，为求 a除以 b的余数，某人编写了以下函数： Function fun(a As Integer， b As Integer) While a b a=ab Wend fun=a End Function 在调试时发现函数是错误的。为使函数能产生正确的返回值，应做的修改是( )。 （ A）把 a=ab改为 a=ba （ B）把 a=ab改为 a=a b （ C）把 While a b改为 While a b （ D）把 While a b改为 While a =b 34 在窗体上画 1个命令按钮和 1个文本框，其名称分别为 Command1和 Text1，再编写如下程序： Dim ss A

18、s String Private Sub Textl_KeyPress(KeyAscii As Integer) If Chr(KeyAseii) ”Then ss=fls+Chr(KeyAseii) End Sub Private Sub Commandl_Click() Dim m As String， i As Integer For i=Len(as)To 1 Step一 1 m=m+Mid(ss， i， 1) Next Text1 Text=UCase(m) End Sub 程序运行后，在文本框中输入 “Number 100”，并单击命令按钮，则文本框中显示的是 ( )。 （ A）

19、NUMBER 100 （ B） REBMUN （ C） REBMUN 100 （ D） 001 REBMUN 35 窗体的左右两端各有 1条直线，名称分别为 Line1、 Line2；名称为 Shapel的圆靠在左边的 Linel直线上 (见图 )；另有 1个名称为 Timerl的计时器控件，其 Enabled属性值是 True。要求程序运行后，圆每秒向右移动 100，当圆遇到 Line2时则停止移动。 为实现上述功能，某人把计时器的 Interval属性设置为 1000，并编写了如下程序： Private Sub Timerl_Timer() For k=Linel X1 To Line2

20、X1 Step 100 If Shapel Left+Shapel Width Line2 X1 ThenShape1 Left=Shape1 Left+100 End If Next k End Sub 运行程序时发现圆立即移动到了右边的直线处，与题目要求的移动方式不符。为得到与题目要求相符的结果，下面修改方案中正确的是 ( )。 （ A）把计时器的 Interval属性设置为 1 （ B）把 For k=Linel X1 To Line2 X1 Step 100和 Next k两行删除 （ C）把 For k=Linel X1 To Line2 Xl Step 100改为 For k=Li

21、ne 2 X1 To Linel X1 Step 100 （ D）把 If Shape1 Left+Shape1 Width Line2 X1 Then改为 If Shapel LeftLine2 X1 Then 36 窗体如图 1所示。要求程序运行时，在文本框 Textl中输入一个姓氏，单击 “删除 ”按钮 (名称为 Command1)，则可删除列表框 List1中所有该姓氏的项目。若编写以下程序来实现此功能：Private Sub Commandl_Click() Dim n k n=ten(Text1 Text) For k=0 To Listl ListCount一1 If Left(

22、List1 List(k)， n)=Text1 Text Then List1 RemoveItem k End If Next k End Sub 在调试时发现，如输入 “陈 ”，可以正确删除所有姓 “陈 ”的项目，但输入“刘 ”，则只删除了 “刘邦 ”、 “刘备 ”2项，结果如图 2所示。这说明程序不能适应所有情况，需要修改。正确的修改方案是把 For k=0 To List1 ListCount一 1改为( )。 （ A） For k=List1 ListCount一 1 To 0 Step一 1 （ B） For k=0 To List1 ListCount （ C） For k=1

23、To List1 ListCount一 1 （ D） For k=1 To List1 ListCount 37 窗体上有一个 Text1文本框，一个 Command1命令按钮，并有以下程序： Private Sub eornmandl_Click() Dim n If Textl Text ”123456”Then n=n+1 Print”口令输入错误 ”&n&“次 ” End If End Sub 希望程序运行时得到如图所示 的效果，即：输入口令，单击 “确认口令 ”命令按钮，若输入的口令不是“123456”，则在窗体上显示输入错误口令的次数。但上面的程序实际显示的是右图所示的效果，程序需

24、要修改。下面修改方案中正确的是 ( )。 （ A）在 Dim n语句的下面添加一句： n=0 （ B）把 Print”口令输入错误 ” n ”次 ”改为 Print”口令输入错误 ”+n+”次 ” （ C）把 Print”口令输入错误 ”&n ”次 ”改为 Print”口令输入错误 ”&Str(n)&”次 ” （ D）把 Dim n改为 Static n 38 下面程序计算并输 出的是 ( )。 Private Sub Command1_Click() a=10 s=0 Do s=s+a*a*a a=a一 1 Loop Until a =0 Print s End Sub （ A） 13+23

25、+33+10 3的值 （ B） 10!+3!+2!+1! 的值 （ C） (1+2+3+10) 3的值 （ D） 10个 103的和 39 设窗体上有一个通用对话框控件 CD1，希望在执行下面程序时，打开如图所示的文件对话框 ： Private Sub Command1_Click() CD1 DialogTitle=”打开文件 ” CD1 InitDir=”C： ” CD1 Filter=”所有文件 |* *|Word文档 |* doc|文本文件|* txt” CD1 FileNarne=“ CD1 Action=1 If CD1 FileNarne=”Then Print”未打开文件 ”

26、Else Print”要打开文件 ” CD1 FileName End If End Sub 但实际显示的对话框中列出了 C：下的所有文件和文件夹 ， “文件类型 ”一栏中显示的是 “所有文件 ”。下面的修改方案中正确的是 ( )。 （ A）把 CD1 Action=1改为 CD1 Action=2 （ B）把 ”CD1 Filter=”后面字符串中的 ”所有文件 ”改为 ”文本文件 ” （ C）在语句 CD1 Action=1的前面添加： CD1 FilterIndex=3 （ D）把 CD1 FileName=”改为 CD1 FileName=”文本文件 ” 40 设工程中有 2个窗体：

27、Form1、 Form2， Form1为启动窗体。 Form2中有菜单，其结构如表。要求在程序运行时 ，在 Form1的文本框 Textl中输人口令并按回车键(回车键的 ASCII码为 13)后，隐藏 Form1，显示 Form2。若口令为 “Teacher”，所有菜单都可见；否则看不到 “成绩录入 ”菜单项。为此，某人在 Form1窗体文件中编写如下程序： Private Sub Textll_KeyPress(KeyAscii As Integer) If KeyAscii=13 Then If Text1 Text=”Teacher”Then Form2 input Visible=Tr

28、ue Else Form2.input Visible=False End If End If Form1 Hide Form2 Show End Sub 程序运行时发现刚输入口令时就隐藏了 Form1，显示了 Form2，程序需要修改。下面修改方案中正确的是 ( )。 （ A）把 Form1中 Text1文本框及相关程序放到 Form2窗体中 （ B）把 Form1 Hide、 Form2 Show两行移到 2个 End If之间 （ C）把 If KeyAscii=13 Then改为 If KeyAscii=“Teacher“Then （ D）把 2个 Form2 input Visibl

29、e中的 “Form2 ”删去 二、基本操作题 41 在名称为 Form1，标题为 “组合框 ”的窗体上画 1个名称为 Cornbo1的组合框，利用属性窗口设置适当属性使其在程序刚开始运行时的界面如图所示。 注意；存盘时必须存放在考生文件夹下，工程文件名为 sjtl vbp，窗体文件名为 sjt1 frm。42 在名称为 Form1的窗体上画一个名称为 Image1的图像框，并通过属性窗口为其装入考生文件夹中的图标文件 CARS ico；再画一个名称为 Timer1的计时器，一个名称为 Commandl、标题为 “开始 ”的命令按钮，如图所示。 要求：通过属性窗口设置适当的属性，再编写适当的事件

30、过程，使得程序运行时，单击 “开始 ”按钮，图片可以每 0 2秒向右移动 50。 注意：程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为 sjt2 vbp，窗体文件名为 sjt2 frm。 三、简单应用题 43 在考生文件夹下有一个工程文件 sjt3 vbp，含有两个窗体，名称分别为Form1、 Form2。其中 Form1上有两个控件 (图像框和计时器 )和一个菜单项 “操作 ”，含有三 个子菜单 (如图 1所示 )。 Form2上有一个名称为 Command1、标题为“返回 ”的命令按钮 (如图 2所示 )。要求当单击 “窗体 2”菜单命令时，

31、Form1隐藏，Form2显示。单击 “动画 ”菜单命令时，使小汽车开始移动，一旦移到窗口的右边界时自动跳到窗体的左边界重新开始移动。单击 “退出 ”菜单命令时，结束程序运行。请去掉程序中的注释符，把程序中的 ?改为正确的内容。 注意：考生不得修改窗体文件中已经存在的程序。最后程序按原文件名存盘。44 在考生文件夹下有一个工程文件 sjt4.vbp。其窗体上已有部分控件，请按照 图 1所示添加框架和单选按钮。要求：添加两个框架， 名称分别为 Frame1、 Frame2，在 Frame1中添加一个名为 Optionl的单选按钮数组，含两个单选按钮，标题分别为 “古典音乐 ”、 “流行音乐 ”，

32、在 Frame2中添加两个单选按钮，名称分别为Option2、 Option3，标题分别为 “篮球 ”、 “羽毛球 ”。刚运行程序时， “古典音乐 ”和“篮球 ”单选按钮初始状态为选中状态。单击 “选择 ”按钮，将把选中的单选钮的标题显示在标签 Label2中，如图 2所示。如果 “音乐 ”或 “体育 ”未被选中，相应的单选按钮不可用。 要求：按照题目要求添加控件，去掉程序中的注释符，把程序中 的 ?改为正确的内容。 注意：不能修改程序的其他部分和控件属性。最后将修改后的文件按原文件名存盘。 四、综合应用题 45 在窗体上建立三个菜单 (名称分别为 Read、 Cale和 Save，标题分别为

33、 “读人数据 ”、 “计算并输出 ”和 “存盘 ”)，然后添加一个文本框 (名称为 Text1，可显示多行，ScrollBars属性设置为 2)(如图所示 )。程序运行后，如果执行 “读入数据 ”命令，则读入 datainl txt文件中的 100个整数，放入一个数组中，数组的下界为 1；如果单击 “计算并输出 ”按钮，则把该数组中小于 50的元素 显示在文本框中，求出它们的和，并把所求得的和显示在窗体上；如果单击 “存盘 ”按钮，则将所求得的和存入考生文件夹下的 dataout txt文件中。 在考生文件夹下有一个工程文件 sjt5 vbp。窗体文件中的 ReadData过程可以把 data

34、in1 txt文件中的 100个整数读入 Arr数组中；而 WriteData过程可以把指定的整数值写到考生文件夹下指定的文件中 (整数值通过计算求得，文件名为 dataout txt)。注意：考生不得修改窗体文件中已经存在的程序。存盘时，工程文件名仍保存为 sjt5 vbp，窗体文件名 仍保存为sjt5 frm。 国家二级（ VB）机试模拟试卷 138答案与解析 一、选择题 1 【正确答案】 A 【试题解析】 栈是先进后出的数据结构，所以栈顶元素最后人栈却最先被删除。栈底元素最先入栈却最后被删除。所以选择 A。 2 【正确答案】 C 【试题解析】 栈是先进后出的数据结构，在整个过程中，栈底指

35、针不变，人栈与出栈操作均由栈顶指针的变化来操作，所以选择 C。 3 【正确答案】 D 【试题解析】 根据二叉树的基本性质 3：在任意一棵二叉树中，度为 0的叶子结点总比度为 2的结 点多一个，所以本题中度为 2的结点为 1一 1=0个，所以可以知道本题目中的二义树的每一个结点都有一个分支，所以共 7个结点共 7层，即度为 7。 4 【正确答案】 A 【试题解析】 软件按功能可以分为：应用软件、系统软件、支撑软件。操作系统、编译程序、汇编程序、网络软件、数据库管理系统都属于系统软件。所以B、 C、 D都是系统软件，只有 A是应用软件。 5 【正确答案】 B 【试题解析】 1966年 Boehm和

36、 Jacopini证明了程序设计语言仅仅使用顺序、选择和重复三种节本控制结构就足以表达出各种其他 形式结构的程序设计方法。 6 【正确答案】 A 【试题解析】 详细设计的任务是为软件结构图中而非总体结构图中的每一个模块确定实现算法和局部数据结构，用某种选定的表达工具表示算法和数据结构的细节，所以 A错误。 7 【正确答案】 C 【试题解析】 数据定义语言：负责数据的模式定义与数据的物理存取构建；数据操纵语言：负责数据的操纵，包括查询及增、删、改等操作；数据控制语言：负责数据完整性、安全性的定义与检查以及并发控制、故障恢复等功能。 8 【正确答案】 D 【试题解析】 因为一个教 师可讲授多门课程

37、，而一门课程又能由多个老师讲授所以他们之间是多对多的关系，可以表示为 m： n。 9 【正确答案】 D 【试题解析】 关系 T中的元组是关系 R中有而关系 s中没有的元组的集合，即从关系 R中除去与关系 S中相同元组后得到的关系 T。所以做的是差的运算。 10 【正确答案】 B 【试题解析】 只有 B选项 369可以用无符号整数来表示和存储。 A选项一 369有负号，选项 C 0 369是小数，都不能用无符号整数类存储。选项 D是一个整数集合，得用数组来存储。 11 【正确答案】 B 【试 题解析】 vbp工程文件，包含与管理工程有关的所有的文件和对象清单。 bas标准模块文件，包含公用的一些

38、变量和过程等代码。 vbw工作区文件，包含了该工程中各窗体 (指开发区窗体，如代码窗、设计窗 )的位置。 frm窗体文件，包含了窗体及窗体中包含的各控件的代码、属性等信息。 故选项 B正确。 12 【正确答案】 D 【试题解析】 Rnd函数产生 0 1之间的随胡激，不包括 0和 1。要产生 150(包含 1和 50)之间的随机整数，可以先产生 0一 50之间的随机整数，然后再 这个基础上加 1。故 D选项正确。 13 【正确答案】 C 【试题解析】 选项 c中 (x 7)*7得到的值是 x， xx=0返回 False，不执行 Print x，所以不能输出 x的值。故 C选项错误。也可以把实际数

39、值带入语句中运行，根据结果就可判断选项。 14 【正确答案】 C 【试题解析】 Sgn函数是符号函数，正数返回 1，负数返回一 1， 0返回 0。本题中 0 25是正数，所以返回 1，故 c选项正确。 15 【正确答案】 A 【试题解析】 变体型变量能够存储所有系统定义类型的数据。所以变体类型 数组中可以存放相同类型或不同类型的数据。故选项 A错误。 16 【正确答案】 D 【试题解析】 根据闰年的条件，第一个条件是并且的关系，要用 And运算符。整除用 Mod运算符，取模后为 0，说明能整除，不为 0，说明不能整除。所以第一个条件为 y Mod 4=0 And y Mod 100 0。 第二

40、个条件是能被 400整除，所以是 y Mod 400=0。 满足其中任何一个条件就行，两个条件之间是或者关系，所以用 Or运算符。 综合一下，故 D选项正确。 17 【正确答案】 D 【试题解析】 当用户按下键盘上的任意键时，会触发当前拥有焦点对象的KeyDown事件，用户松开键盘上任意键时，就会触发 KeyUp事件。当用户按下又松开键盘上任意键时，触发 KeyPress事件。故 A选项正确。 KeyDown事件和 KeyUp事件均向事件过程返回两个参数 KeyCode和 Shift。KeyCode参数返回所按键对应的 ASCII字符代码的整型数值或键代码常数，大小写字符被看作是相同字符，返回

41、同一个 KeyCode值。故 B选项正确。 Shift参数用于判断用户是否按下 Shift、 Ctrl和 Ah键，若用户按下了对应的键， Shift参数会返回不同的值。根据以上 KeyDown和 KeyUp事件能识别 Shift、Ctrl和 Alt键。故 C选项正确。 KeyPress事件只有一个参数 KeyAscii，它可以返回按键对应的 Ascii值，大小写字母 Ascii值不同。 KeyCode不是 KeyPress事件的参数。故 D选项错误。 18 【正确答案】 A 【试题解析】 窗体的 Hide方法只是将窗体隐藏，并不卸载窗体。故 A选项错误，其他选项都正确。 19 【正确答案】 D

42、 【试题解析】 在窗体所有代码前定义的变量是窗体级变量，在整个窗体模块的过程中都能引用。 20 【正确答案】 A 【试题解析】 IIF是条件函数，它的语法格式是： IIf(条件表达式，表达式为 True时的取值，表达式为 False时的取值 ) B选项中，内层的 IIF函数中，当 x 0时， x+1，否则 x1，所以应该是 IIf(x 0， x+1， x1)。 C选项中，内层的 IIf函数中，当 x 0时， x一 1，否则 0，所 以应该是 IIf(x0， x-1,0) D选项中 lIf函数中有 4个参 数不对，应该有 3个参数。故 B、 C、 D选项均错误， A选项正确。 21 【正确答案】

43、 C 【试题解析】 一个操作动作有时会触发一个或多个事件。比如当按下键盘的某键时，会触发 KeyDown和 Keypress事件。故 A选项错误。 22 【正确答案】 D 【试题解析】 ListCount属性返回列表框中列表项的个数，列表项的索引号从 O开始，所以要删除最后一个列表项， ReMoveltem方法中的索引号就应该是List1 ListCount1，故 D选项正确。 23 【正确答案】 D 【试题 解析】 菜单项中不管是主菜单还是子菜单，单击某个菜单项，都会执行它们相应的单击事件过程。故 D选项叙述错误。 24 【正确答案】 B 【试题解析】 通用对话框是一个 AcfiveX控件，

44、不是标准控件，故 B选项错误。 25 【正确答案】 C 【试题解析】 Form2 Hide是隐藏 Form2窗体； UnloadMe是卸载并关闭当前窗体； Me Hide是隐藏当前窗体。 From2 Unload语法错误。故 c选项不能使窗体 Form2消失。 26 【正确答案】 B 【试题解析】 向文本框输入文 本时，有按键的动作，所以会触发 KeyPress事件。故选 B。 27 【正确答案】 A 【试题解析】 命令按钮的 Enabled属性是设置可用不可用，故 A选项正确。 Visible属性是设置可见不可见； Cancel属性值为 True时，表示按 Esc键和单击该命令按钮一样都会触

45、发该命令按钮的单击事件，反之， Esc键不起作用； Default属性值为 True时，表示按回车键和单击该命令按钮一样都会触发该命令按钮的单击事件，反之，回车键不起作用。 28 【正确答案】 D 【 试题解析】 用鼠标拖动滚动条中的滚动块，说明在滚动条上有拖动、滚动的动作，所以触发滚动条的 Scroll事件，故选 D。 29 【正确答案】 C 【试题解析】 A选项错误原因：在控件数组的任何控件上按键盘键，会触发KeyPress事件； B选项错误原因：只有按键盘上的 ASCII字符键时，才能触发 KeyPress事件。ASCII字符键包括标准键盘上的字符、数字、标点符号、 Enter、 Tab

46、和 Backspace键等，其他键 KeyPress事件不能识别。 D选项错误原因：窗体也有 KeyPresss事件。故 C选项正确。 30 【正确答案】 C 【试题解析】 程序中 flag被定义为 Static变量，它的值只在第一次执行事件过程时为 0，以后每次执行计时器事件过程它的值都会保留上次过程中运算后的值，之后它的值是 1或一 1。文本框控件的 ForeColor属性表示文本框中文字的颜色，计时器控件的 Interval属性为 5000，即计时器间隔为 5秒钟一次，每次调用就会交替改变文本框中文字的颜色。因此 c选项正确。 31 【正确答案】 D 【试题解析】 程序应该计算的是 2的

47、 0次方到 2的 10次方的和，程序少计算了 2的 1次方，应该先累加，再执行 a=a*2。并且将 For k=2 to 10改为 For k=1 to 10，这样最后一次循环 2的 10次方的值能正确累加，然后循环结束。因此答案为D。 32 【正确答案】 B 【试题解析】 在标准模块中定义的使用 Pubhc定义的变量是全局变量，全局变量可以在工程的每个模块、每个过程中使用。如果在过程中有与全局变量同名的过程变量则优先使用过程变量。在命令按钮事件中定义了局部变量 x，与全局变量同名，因此在此事件中使用局部变量，而变量 y在此过程中没 有定义，则仍使用全局变量。因此输出时 x值为 100， y值

48、为 120。 33 【正确答案】 D 【试题解析】 程序中没有考虑余数为 0的情况，即，条件中应该有 a=b，则a=ab，这样才能正确得到余数 0。因此程序中应该修改 While的条件 a b为 a =b。 34 【正确答案】 D 【试题解析】 题目中程序是将 ss字符串进行反向排列，并放到 m中去。其中Number空格后的 100被当成字符串来处理，最后结果是将 “Number 100”反向排列，并通过 UCase()函数将所有字母转换成大写，得到 001 REBMUN。 35 【正确答案】 B 【试题解析】 在计时器事件中不应再设置步长为 100的 For循环，应该把 For循环去掉，只留

49、下循环体的语句，计时器每秒激发一次，每次判断小球是否移到Line2处，不到就改变自己的 Left值即继续移动。因此 B正确。 36 【正确答案】 A 【试题解析】 错误原因：每一次删除列表框满足项，列表框的项目数目就会相应地减少，所以就出现了漏删内容，如果把循环变量 k改成从 List1 ListCout一 1到 0，从最后一个项目往第一个项目查找，满足条件就删除该项目 ，从而不会出现遗漏现象，所以正确答案为 A。 37 【正确答案】 D 【试题解析】 本题考查的是动态变量与静态变量。原来的程序中无法使变量 n的值保持到下一次的使用，只有 D选项符合要求，将 n定义为静态局部变量，在程序执行到该对象的声明处时被首次初始化，每次执行后 n的值都会被保存到内存中，所以答案 D是正确的；而 A选项只是对 n赋初值，所以 A选项没有意义；