当n为100、p为10时，实付金额s的值是(   )。

        PRIVATE SUB FORM_CLICK

        DIM A（4，4） AS INTEGER

        FOR I = 1 TO 4

           FOR J= 1 TO 4

              IF {#blank#}1{#/blank#}

                A（I，J）=1

              {#blank#}2{#/blank#}

               A（I，J）=0

              END IF

              PRINT A（I，j）;

              {#blank#}3{#/blank#}

            PRINT

              {#blank#}4{#/blank#}

        END SUB

For i=1 To 100

For j=i To 100

If j Mod i=0 Then a(j)=a(j)+1

Next j

Next i

Text1. Text=Str(a(30))

数组a各元素的初值为0，执行上述程序段后，文本框Text中输出的内容为（  ）

a(1) = "231": a(2) = "34": a(3) = "23": a(4) = "234": a(5) = "123"

For i = 1 To 2

    For j = 1 To 5 - i

       If a(j) > a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t

   Next j

   Text1.text=a(j)

Next i

执行该程序段后，文本框Text1显示的内容为（    ）