有如下Visual Basic程序段：
Dim a(1 To 7) As Integer, i As Integer, j As Integer, k As Integer, c As Integer
a(1) =" 3:" a(2) =" 9:" a(3) =" 1:" a(4) =" 5:" a(5) =" 8:" a(6) =" 6:" a(2) = 2
s = ""
For i =" 1" To 3
For j =" i" + 1 To 7
If a(j) < a(i) Then
k =" a(j):" a(j) =" a(i):" a(i) = k
c =" c" + 1
End If
Next j
s =" Str(a(i))" + s
Next i
text1.Text =" Str(c)" & “:” & s
该程序段运行后,文本框Text1中显示的内容是

A．5:6 8 9

B．3: 9 8 6

C．3:1 2 3

D．5:3 2 1

在Visual Basic 中，下列优先级最高的运算符是(   )

A．*

B．\

C．<

D．Not

若x是大于0的偶数，则下列关系表达式的值一定为真的是（  ）
①x Mod 2=0 ②x\2=0 ③x\2=x/2    ④Int(x/2) <>x/2

A．①②

B．①②③

C．①③

D．①③④

下列逻辑表达式中能完全正确表示条件“year是闰年”的是（    ）。

A．year mod 4=0

B．year mod 400=0

C．(year mod 400="0)or(" year mod 4="0)and(" year mod 100<>0)

D．(year mod 400="0)and(" year mod 4="0)or(" year mod 100<>0)

在VB中，若x=5，y=30，则下列表达式的运算结果不等于6的是 (   )

A．y/x

B．1-x*5+y

C．y/4+1

D．x+1