下列VB程序运行时，单击命令按钮Command1后，文本框Text1中显示的内容是____________________。（2分）
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c =" 0:" n = 10
For i =" 1" To 10 Step 2
If n Mod i =" 0" Then
c =" c" * i
Else
c =" c" + i
End If
Next i
Text1.Text = Str(c)
End Sub

下列能作为赋值语句的是：

A．100=a

B．a+b=10

C．p=True

D．x="2*y" or k=8

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

Y为分段函数

求y的值。完成该流程图，在空白处填入_____

A．x mod 2 <> 0

B．x / 2 = 0

C．x =" 2" * n-1

D．x \ 2 = 0

语句A%=6.8执行后，变量A%的值是（ ）。

A．6

B．7

C．6.8

D．7.0