. .
C. 4 9 D. 1 4
(1分)
40. 程序中未定义的变量均为integer，单击Command1，程序的输出是 。 Private Sub Command1_Click() k=4：m=1 n=Func(k, m)
Print n, Func(k,m) End Sub
Public Function Func(a As Integer, b As Integer) As Integer Static m As Integer m=0：i=2 i=i+m+1 m=i+a+b Func=m End Function
A. 8 8 B. 8 20 C. 8 16 D. 8 17
(1分)
41. 在多窗体的应用程序中，当前窗体模块的Form_Click事件过程中包含如下语句，单击该窗体，其中 一定可以将Hello显示在当前窗体上。
A. Forml.Print B. Me.Print 〞Hello〞 C. Debug.Print 〞Hello〞 D. Form2.Print 〞Hello〞
(1分)
42. 当一个工程含有多个窗体时，其中的启动窗体是 。
A. 启动时建立的窗体
. . .
. .
B. 第一个添加窗体 C. 最后一个添加的窗体
D. 在“工程属性”对话框中指定的窗体
(1分)
43. Sub Main函数可以在 模块中定义。
A. 窗体 B. 标准 C. 类模块 D. 以上均可
(1分)
44. 下列操作中不能向工程添加窗体的是 。
A. 单击工具栏上的添加窗体按钮
B. 右击窗体，在弹出的菜单中选择“添加窗体”命令
C. 右击工程资源管理器，在弹出菜单中选择“添加”，然后在下一级菜单中选择“添加窗
体”
D. 执行“工程”菜单中的“添加窗体”命令
(1分)
45. 要为工程添加一个过程，可执行“ ”菜单中的“添加过程”.
A. 文件 B. 视图 C. 工程 D. 工具
(1分)
46. 以下说确的是 。
A. 在VB中，过程可以嵌套定义也可以嵌套调用 B. 在VB中，过程可以嵌套定义但不可以嵌套调用
. . .
. .
C. 在VB中，过程不可以嵌套定义但可以嵌套调用 D. 在VB中，过程不可以嵌套定义也不可以嵌套调用
(1分)
47. 模块的通用声明处有如下语句，会产生错误的语句是 。
①Const a as Integer=25 ②Public St As String * 8 ③ReDim B(3) As Integer ④Dim Const X As Integer=10
A. ①② B. ①③ C. ①②③ D. ②③④
(1分)
48. 使用Public Const语句声明一个全局的符号常量时，该语句应放在 。
A. 过程中
B. 窗体模块的通用声明段 C. 标准模块的通用声明段
D. 窗体模块或标准模块的通用声明段
(1分)
49. 可以在 中，使用语句Public PubStr As String*20定义一个定长字符串。
A. 窗体模块 B. 标准模块 C. 类模块 D. 三者均可
(1分)
50. 在窗体的General段声明变量时，不能使
用 关键字。
. . .
. .
A. Dim B. Public C. Private D. Static
(1分)
51. 以下有关变量作用域的说明中，错误的
是 。
A. 只有在标准模块中用Public语句说明的变量才是全局变量 B. 在过程中不能使用Public语句说明全局变量 C. 在标准模块的通用声明处可用语句说明模块级变量 D. 在窗体的通用声明处可用Private语句说明窗体级变量
52. 单击按钮,输出为__________。
Private Sub fun( ) Static a As Integer a=a+2 Print a; End Sub
Private Sub Command1_Click( ) Dim m As Integer For m=1 To 3 Call fun Next m End Sub
A. 2 2 2 B. 0 0 0 C. 2 4 8 D. 2 4 6
53. 在单击命令按钮时的输出结果是________。
Private Sub Command1_Click ( ) Dim x%, y%
. . . 分)
分)
(1(1
. .
x=1:y=1 For n=1 to 3 z=First (x, y) Print n, z Next n End Sub
Private Function First% (x%, y%) Dim n%
Do While n <= 4 x=x+y n=n+1 Loop First=x End Function
A. 1 6 2 11 3 16 B. 2 6 1 3 11 16 C. 1 2 3 4 5 6 D. 2 1 3 1 3 3
54. 设有下列程序代码，在单击命令按钮时的输出结果是________。
Sub SS (ByVal x, ByRef y, z) x=x+1 y=y+1 z=z+1 End Sub
Private Sub Command1_Click ( ) A=1: B=2 :C=3 Call SS (A,B,C) Print A,B,C End Sub
A. 1 2 3 B. 1 3 4 C. 2 2 4 D. 1 3 3
55. 程序运行后，如果单击命令按钮，则在文本框中显示的容是________。
. . . 分)分) (1
(1
南京工业大学VB期末考试模拟题6
