1．       有如下程序：

Private Function func(ByVal a As Integer, ByVal b As Integer)

  func = a + b

End Function

Private Sub Command1_Click( )

  Dim x As Integer, y As Integer

  Dim z As Integer, r As Integer

  x = 2 : y = 5 : z = 8

  r = func(func(x,y),z)

  Print r

End Sub

当在Command1按钮上单击，该程序的输出结果是（　　　）

（A）12                  （B）13               　（C）14                         （D）15

2．       设有如下通用过程：

Public Sub Fun(a( ), ByVal x As Integer)

  For i = 1 To 5

x = x + a(i)

            Next

         End Sub

在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：

         Private Sub Command1_Click( )

            Dim art(5) AsVariant

            For i = 1 To 5

              art(i) = i

            Next i

            n = 10

            Call Fun(art( ), n)

            Text1.Text = n

         End Sub

程序运行后，单击命令按钮，在文本框中显示的内容为（　　　）

（A）10                  （B）15                      （C）25                      （D）24

3．       要为工程添加一个过程，可执行“（　　　）”菜单中的“添加过程”

（A）文件               （B）视图                   （C）工程                   （D）工具

4．       以一关于键盘事件中，叙述错误的是（　　　）

（A）       在KeyUp和KeyDown事件过程中，从键盘上输入A或a被视作相同的字母（即具有相同的KeyCode）

（B）       在KeyUp和KeyDown事件过程中，将键盘上的“1”和右侧小键盘上的“1”视作不同的数字（即具有不同的KeyCode）

（C）       KeyPress事件中不能识别键盘上某个键的按下与释放

（D）       KeyPress事件中可以识别键盘上某个键的按下与释放

5．       以下关于菜单的叙述中错误的是（　　　）

（A）      在同一个窗体的菜单项中，不允许出现标题相同的菜单项

（B）      在菜单的标题栏中，“&”所引导的字母指明了访问该菜单项的键盘访问键

（C）     程序运行过程中，可以重新设置菜单的“Visual”属性

（D）     弹出式菜单也在菜单编辑器中定义

6．       有一个菜单项名为Menu123，若想在程序运行的过程中选中该菜单项，即在该菜单项前面显示“√”，可执行下面的（　　　）语句

（A）Menu123.Enabled = True                 （B）Menu123.Enabled = False

（C）Menu123.Checked = True                （D）Menu123.Checked = False

7．       可通过“打开”对话框的（　　　）属性设置对话框中所显示文件的类型

（A）FileName               （B）Filter           （C）FilterIndex         （D）InitDir

8．       以一关于通用对话框控件的叙述中错误的是（　　　）

（A）      在程序运行时，通用对话框控件是不可见的

（B）      在同一个程序中，用不同的方法（如ShowOpen或ShowSave等）打开的通用对话框具有不同的作用

（C）     调用通用对话框控件的ShowOpen方法，可以直接打开在该通用对话框中指定的文件

（D）     调用通用对话框控件的ShowColor方法，可以打开颜色对话框

9．       在显示颜色对话框之前必须设置（　　　）属性，否则将发生不存在字体的错误

（A）FontName             （B）FontSize            （C）Max            （D）Flags

10．   以一叙述中错误的是（　　　）

（A）      一个工程中只能有一个Sub Main过程

（B）      窗体的Show方法的作用是将指定的窗体装入内存并显示该窗体

（C）     窗体的Hide方法和Unload方法的作用完全相同

（D）     若工程文件中有多个窗体，可以根据需要指定一个窗体为启动窗体