下面的程序代码是通过函数求出二个整数型变量a、b中的较大值，其中所定义的函数名是（   ）
Function max(a, b As Integer) As Integer
If a > b Then max = a  Else  max = b
End Function
Private Sub Command1_Click()
Dim a As Integer, b As Integer, s as integer
a =" Val(Text1.Text):" b = Val(Text2.Text)
s =" max(a," b)
Text3.Text = s
End Sub

A．Command1_Click

B．function

C．max

D．max(a, b As Integer)

如图所示的流程图片断，该流程图执行过后，A、B的值分别为(   )

A．A是20，B是30

B．A 是20，B是20

C．A是30，B是30

D．A是30，B是20

程序中的变量是计算过程中要用的数据的   。

下列不属于VB常量类型的是(   )

A．数值型

B．字符型

C．布尔型

D．时间型

某校5名学生会推荐成员网络人气得票数依次为1201，2120，1009，1987，2009，
若采用选择排序算法对其进行从大到小排序，则第二趟的排序结果是（ ）

原始数据	1201	2120	1009	1987	2009
第一趟	2120	1201	1009	1987	2009
第二趟
第三趟	2120	2009	1987	1009	1201
第四趟	2120	2009	1987	1201	1009

 

A．2120  2009  1009  1987  1201

B．2120  2009 1009  1201  1987

C．1009  1201  2120  1987  2009

D．1009  1201  2009  2120  1987