下列程序用来判断一个单词是否是素单词：设定小写字母a-z对应的数字为1-26，大写字母A-Z对应的数字为27-52，将某个单词的所有字母按照其对应的数字求和，判断其和是否是素数，如果是输出“It is a prime word．”，反之则输出“It is not a prime word．”。如单词“Hello”，字母分别对应的数字为：34、5、12、12、15，其和为34+5+12+12+15=78，不是素数，因此单词“Hello”并不是素单词，在Label1中输出“It is not a prime word．”。（已知字母A的ASCII码值为65，a的ASCII码值为97）。程序运行界面如下图所示：

Private Sub Command1_Click( )

    Dim s As String, t As String, n As Integer

    Dim i As Integer, m As Integer

    s = Text1.Text

    n = Len（s）

    For i = 1 To n

        t = Mid（s，i，1）

        If t >= "A" And t <= "Z" Then

            m =        ①          

        ElseIf t >= "a" And t <= "z" Then

            m= m + Asc（t）- 96       ‘Asc（t）用于返回字符t的ASCII 码值

        End If

    Next i

    For i = 2 To m - 1

        If  Then Exit For

    Next i

    If      ②     Then

        Label1.Caption = "It is a prime word."

    Else

        Label1.Caption = "It is not a prime word."

    End If

End Sub