设有如下程序：Private Sub Form Click（　　）Dim s As Long，f As LongDim n As Integer，i As Integerf=1n=4For i=1 To nf=f*is=s+fNext iPrint sEnd Sub程序运行后，单击窗体，输出结果是（　　）。

试卷相关题目

• 1以下叙述中错误的是（　　）。

  A.在KeyPress事件过程中不能识别键盘的按下与释放

  B.在KeyPress事件过程中不能识别回车键

  C.在KeyDown和KeyUp事件过程中，将键盘输入的“A”和“a”视作相同的字母

  D.在KeyDown和KeyUp事件过程中，从大键盘上输出的“1”和从右侧小键盘上输入的“1”被视作不同的字符

  开始考试点击查看答案
• 2索引属于（　　）。

  A.模式

  B.内模式

  C.外模式

  D.概念模式

  开始考试点击查看答案
• 3下列操作不能向工程中添加窗体的是（　　）。

  A.执行“工程”菜单中的“添加窗体”命令

  B.单击工具栏中的“添加窗体”按钮 ．

  C.右击窗体。在弹出的菜单中选择“添加窗体”命令

  D.右击T程资源管理器，在弹出的菜单中选择“添加”命令，然后在下一级菜单中选择：“添加窗体”命令

  开始考试点击查看答案
• 4下列选项中不属于结构化程序设计原则的是（　　）。

  A.可封装

  B.自顶向下

  C.模块化

  D.逐步求精

  开始考试点击查看答案
• 5已知a=5．b=／，c=12，下列表达式的值为True的是（　　）。

  A.a>b And c

  B.a>b Or c

  C.a>b Xor c

  D.a>a Eqv c开始考试点击查看答案

• 6以下关于函数过程的叙述中错误的是（　）。

  A.函数过程一定有返回值

  B.函数过程一定有参数

  C.函数过程可以在窗体模块和标准模块中定义

  D.函数过程参数的类型与返回值的类型无关

  开始考试点击查看答案
• 7为了使标签具有“透明”的显示效果，需要设置的属性是（　　）。

  A.Caption

  B.Alignment

  C.BackStyle

  D.AuwSize

  开始考试点击查看答案
• 8假定已经在菜单编辑器中建立了窗体的弹出式菜单，其顶级菜单的名称为al，其“可见”属性为False。程序运行后，单击鼠标左键或右键都能弹出菜单的事件过程是（　　）。

  A.Private Sub Form_MouseDown(Button As Integer，_Shift As Integer，X As Single，Y As Single)If Button=1 And Blltton=2ThenPopupMenu a1End IfEnd Sub

  B.Private Stlb Form_MouseDown(Button As Integer，_Shift As Integer，X As Single，Y As Single)PopupMenu a1End Sub

  C.Private Sub Form—MouseDown(Button As Integer，_Shift As Integer，X As Single，Y As Single)If Button=1 ThenPopupMenu a1End IfEnd Sub

  D.Private Sub Form MouseDown(Button As Integer，_Shift As Integer，X As Single，Y As Single)If Buttcn=2 ThenPopupMenu a1End IfEnd Sub

  开始考试点击查看答案
• 9下列叙述中正确的是（　）。

  A.栈是“先进先出”的线性表

  B.队列是“先进后出”的线性表

  C.循环队列是非线性结构

  D.有序线性表既可以采用顺序存储结构，也可以采用链式存储结构

  开始考试点击查看答案
• 10设工程中有2个窗体：Form1、Form2、Form1为启动窗体。Form2中有菜单，其结构如表。要求在程序运行时，在Form1的文本框Text1中输人口令并按回车键(回车键的ASCII码为13)后，隐藏Form1，显示Form2。若口令为“Teacher”，所有菜单项都可见；否则看不到“成绩录入”菜单项。为此．某人在Form1窗体文件中编写如下程序：Private Sub Text 1 KeyPress(KeyAscii As Integer)If KeyAscii=13 ThenIf Text1．Text="Teacher"ThenForm2．input．Visible=TrueElseForm2．input．Visible FalseEnd IfEnd IfForml．HideForm2．ShowEnd Sub菜单结构<table border="0" cellspacing="0" cellpadding="0" _dj="MsoNormalTable"><tbody><tr><td valign="top" width="80">标题 </td><td valign="top" width="61">名称 </td><td valign="top" width="60">级别 </td></tr><tr><td valign="top" width="80">成绩管理 </td><td valign="top" width="61">mark </td><td valign="top" width="60">1 </td></tr><tr><td valign="top" width="80">成绩查询 </td><td valign="top" width="61">query </td><td valign="top" width="60">2 </td></tr><tr><td valign="top" width="80">成绩录入 </td><td valign="top" width="61">mput </td><td valign="top" width="60">3 </td></tr></tbody></table>程序运行时发现刚输入口令时就隐藏了Form1，显示了Form2，程序需要修改。下面修改方案中正确的是（　　）。

  A.把Form1中Text1文本框及相关程序放到Form2窗体中

  B.把Form1．Hide、Form2．Show两行移动2个End If之间

  C.把If KeyAscii=13 Then改为If KeyAseii="Teacher"Then

  D.把2个Form2 input．Visible中的“Form2．”删去

  开始考试点击查看答案