图a

图b为标准ASCII码表供你参考（其中ASCII为1-32,127的字符为特殊符号，不能用作密码）：

图b

实现上述功能的VB程序代码如下，请回答以下问题：

s=″I like IT very much″

flag=False:m=0

For i=1 To Len(s)

ch=Mid(s,i,1)

If ch>=″a″ And ch<=″z″ Then

If Not flag Then

   m=m+1

   flag=True

End If

Else

flag=False

End If

Next i

Text1.Text=Str(m)

Dim a(1 to 20) As Integer

For i=2 to 10

For j=2 to 20\i

a(i*j)=a(i*j) +1

Next j

Next i

该程序段运行后，数组a中元素值为0的个数是（  ）

x=-4.2

y=Abs(Int(x))

If x＞0 And x＜5 Then

 y=y+1

Else

 y=y-1

End If

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