《计算机语言与程序设计》试卷 - A卷(1)

（1）语句“Print a, b, c”的功能是： 显示a,b,c 的值。并分区显示 。 （2）程序运行后，单击窗体，输出结果是： 8，5，3 。

2. 有如下事件过程：

Private Sub Form_Click() Form1.Cls For A = 1 To 5

Print Space(5 - A); String(A, \ ‘Space 的意思空出的个数 Next A End Sub

问题：

（1）语句“Form1.Cls”的功能是： 清除窗体上或图片框上在运行Print方法时显示的文本或用绘图方式所产生的图形。

（2）程序运行后，单击窗体，输出的图案是：

3. 有如下事件过程：

Private Sub Form_Click() Dim n As Integer Dim s As Integer n = 1 s = 0

Do While n <= 3 n = n + 2 s = s + n Loop Print s End Sub

问题：

（1）语句“Dim n As Integer”的功能是： 声明变量n为整型变量 。 （2）程序运行后，单击窗体，输出结果是： 。

4. 在窗体上画一个名称为Command1的命令按钮，然后编写如下函数过程和命令按钮Command1的事件过程：

Private Function f (m As Integer ) As Integer If m Mod 2 = 0 Then f = m Else f = 1

第 5 页 共 6 页

End If End Function

Private Sub Command1_Click() Dim i As Integer，s As Integer s = 0

For i = 1 To 5 s = s + f ( i ) Next i Print s End Sub 问题：

（1）语句“Private Function f (m As Integer ) As Integer”的功能是： （ 定义一个名为f 的函数，其形参m是整型变量，函数返回值也是整型） 。

（2）程序运行后，单击命令按钮，在窗体上显示的是： 9 。

五、 得分 程序设计（10分/题，1小题，共10分）

1. 编写一个过程，要求使用选择法对一组整数数据进行降序排序。过程名为Sort，需要排序．．．．．的数据通过数组从外部传入。

第 6 页 共 6 页