解密规则：将整数中各个位中的每一位值乘以5，然后除以8所得余数即为该位的值，然后将所得数的首末位进行交换。如数字9357，解密后的值为3715。

    Ins=Text1．Text

    n=Len(Ins)

    Outs=Mid(Ins，1，1)    ‘取字符串Ins第1个字符

    i=2

    Do While Mid(Ins，i，1)>=Mid(Outs，i-1，1)

        Outs=Outs+Mid(Ins，i，1)

        i=i+1

    Loop

    Text2．Text=Outs

在文本框Text1中输入“Happy2017”，执行该程序段后，文本框Text2中显示的是（  ）

明文：HelloWorld

密钥：abcabcabca

密文：HfnlpYosnd

依据上述算法描述设计了如下VB程序。请回答下列问题：

实现上述功能的VB 代码如下，其中加框处代码有错，请改正。

Dim n As Integer, i As Integer, t As Integer, sum As Long, s As String n = Val(Text1.Text)

For i = 1 To n ^ 3 Step 2

    sum = 0: t = i: flag = False

    Do While sum <= n ^ 3 And flag = False

       sum = sum + t

            ⑴

       If sum = n ^ 3 Then flag = True

    Loop

    If flag = True Then Exit For

Next i

s = Str(n) + "^" + Str(3) + "="

Do While sum > 0

         ⑵

    If sum = 0 Then

        s = s + Str(i)

    Else

        s = s + Str(i) + "+"

    End If

    i = i + 2

Loop

Text2.Text = s

⑴{#blank#}1{#/blank#} ⑵{#blank#}2{#/blank#}