Dim a As Integer, b As Integer

  a = Val(Text1.Text)

  If a Mod 2 = 0 Then

b = a + 1

ElseIf a Mod 3 = 0 Then

b = a + 2

ElseIf a Mod 5 = 0 Then

b = a + 4

  Else

b = a

  End If

  Label1.Caption = Str(b)

运行该程序，在文本框Text1中输入25，单击命令按钮Command1，在标签Label1中显示的是（   ）

x = InputBox("输入x的值：")

If x > 3 Then

   If x <= 6 Then

     y = 2 * x

   Else

     y = 3 * x

   End If

Else

   y = 4 * x

End If

Print y若x、y均是整型变量，程序运行并输入6，则y的值是（   ）

x=-4.2

y=Abs(Int(x))

If x＞0 And x＜5 Then

 y=y+1

Else

 y=y-1

End If

该程序段运行后，y的值为（  ）