1. 读程序写结果

1. （1） 有如下一段VB程序：

   i=4

   a=5

   If i > 3 Then a = a + 5

   Else a = a + 2

   End If

   写出本程序段运行后，变量a的值。

3. （2） Dim x As Integer, c As Integer, i As Integer

       c = 0

       For i = 1 To 12

           If 12 Mod i = 0 Then

               c = c + 1

           End If

       Next i

   Text1.Text = Str(c)

   程序运行后，在文本框中输出为：。