有一数组a (1 to 6) ，其数值分别为44、38、78、37、96、69想要从小到大排序，编写如下程序代码：
Dim flag As Boolean  'flag值为True表示某一遍加工中发生过交换
i = 1：n=6
flag = True
Do While i <=" n" - 1 And flag = True 
flag = False
For j =" n" To i + 1 Step -1
If a(j) < a(j - 1) Then
k =" a(j):" a(j) =" a(j" - 1): a(j - 1) = k
flag = True
End If
Next j
i =" i" + 1
Loop
以上代码在整个排序过程中, 数组中的数据比较次数和交换次数分别是（  ）

A．9次和4次	B．9次和6次
C．12次和6次	D．15次和12次

在Visual Basic代码中，语句 Mytxt1.Text="kaikai" 中的 Text 是（）。

A．对象名

B．事件名

C．属性名

D．属性值

下棋时要通过掷骰子来随机确定走棋步数。骰子的六个面上标有数字1至6，下面能表示产生1至6之间的随机整数的表达式是：（   ）

A．Rnd(1)*6

B．Rnd(1)*5+1

C．Int(Rnd(1)*6)+1

D．Int(Rnd(1)*5)+1

下列选项中，可以作为VB程序变量名的是（    ）

A．a-b

B．ab

C．a/b

D．a+b

在 VB 中，下列程序段执行后，变量 s 的值是
s=1
For k="1" To 3
s=s+1
Next k

A．1

B．3

C．4

D．6