回数猜想：如果一个正整数从左到右读与从右到左读是一样的，就称之为回文式数（简称回数），如12321．“回数猜想”的主要思想是对任意正整数，若它不是回数，则按下列算法可获得一个回数：
（1）把该整数的数字顺序颠倒，求得该数的逆序数；
（2）将该整数和其对应的逆序数相加；
（3）若相加结果不是回数，则将结果作为新的整数，返回步骤（1）．
小林按照上述算法设计了验证回数猜想的VB程序（猜想次数不超过10次），程序功能如下：在文本框Text1中输入一个正整数，单击Command1按钮，获取文本框Text1中的数，当该数不是回数时，采用回数猜想的方法进行验证，并在列表框List1中输出每次验证的过程，若验证成功或验证次数超过10次，则停止验证，最后在列表框List1中输出验证结果．程序运行效果如图所示．

实现上述功能的VB程序如下：
Private Sub Command1_Click（　　）
     Dim t As String,a As Long,bAs Long
     Dim count As Integer′count用于存储回数猜想的验证次数
     t=Text1．Text
     count=1
     Do While Check（t）=False And count＜=10
           a=Val（t）
           ___①____
           c=a+b
           List1．AddItem Str（a） &“+“& Str（b） &“=& Str（c）
           count=count+1

（1）程序代码中自定义函数Turn的作用是

返回反转后的数字（或返回 数字x的逆序数）

返回反转后的数字（或返回 数字x的逆序数）

．
（2）请将横线处的代码补充完整

①b=Turn（t）

①b=Turn（t）

、

②mid（x,len（x）-i+1，1）

②mid（x,len（x）-i+1，1）

．