下列逻辑表达式中能完全正确表示条件“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)

Function f(x As Long, y As Long) As Long
Dim t As Long, r As Long
If x < y Then t =" x:" x =" y:" y = t
r =" x" Mod y
Do While r <> 0
x =" y:" y = r
r =" x" Mod y
Loop
f = y
End Function
-------------------------------------------------------------------------------------------------
Private Sub Command1_Click()
Dim a As Long, b As Long
x = Val(InputBox("x="))
y = Val(InputBox("y="))
a =" x:" b = y
s =" f(x," y)
MsgBox (Str(a * b / s))
End Sub
当x=20，y=6时，以上程序运行后，输出结果是（   ）

A．2

B．120

C．30

D．60

Sub test1()
a=320
a1="a\100"
a2=(a-100*a1)\10
a3="(a-100*a1-10*a2)"
B=100*a3+10*a2+a1
MsgBox B、
End sub
该程序的运行结果是 （  ）

A．320

B．32

C．230

D．23

清空文本框TEXT1,TEXT2,LABEL1中的内容
PRIVATE  SUB  FORMCLICK（ ）
________3
________4
________5
END   SUB

Sub test2()
a = 12：b = 12：c = 5
Label1.Caption = ""
Label2.Caption = ""
If a > b Or Not b<c Then
Label1.Caption = "monday"
Else
Label2.Caption = "tiger"
End If
Label3.Caption =" Label1.Caption+" Label2.Caption
End sub
该程序段运行后，在标签Label3的Caption属性值是(   )

A．"monday"

B．"tiger"

C．"mondaytiger"

D．""