Private Sub Command1_Click()

    Dim x As Integer

    x=Val(Text1．Text)

    Label1．Caption=Str(x) & prime(x，2)

End Sud   

Function prime(n A Integer m A Integer)As String

    If n=m Then

        prime=“是素数。”

    ElseIf n<2 Or n Mod m=0 Then

        prime=“不是素数。”

    Else

    prime=prime(n，m+1)

End If

End Function

在文本框Text1中输入的值是123，并执行程序后，自定义函数prime( )被执行的次数是（  ）

s = 1/2 + 2/3 : t = 1: b = 2

For i= 3 To 10

Next i

Label1.Caption = "前10项的和是：" + Str(s)

方框中的代码由以下四部分组成：

①b = r   ②t = b   ③r = t + b    ④s = s + r/(r + b)

代码顺序正确的选项是（  ）

s = "Hello, Taizhou!"

n= Len(s): ans =""

For i=1 To n

    c=Mid(s, i, 1))

    If Abs(i-n)<n\2 Then

        If c>="a" And c<="z" Then c=Char(Asc(c)-Asc("a")+Asc("A"))

    End If

        ans=ans+c

    Next i

    Labell.Caption=ans

执行上述程序段后，标签Labell中输出的内容为（  ）