1. 行程压缩编码（RLE）的基本原理：把一个相同值的连续串用一个代表值和串长来表示，如一串字母数据“aaabbbbccccddd”可压缩为“3a4b4c3d”。小王编写了一个VB程序，功能如下：在文本框Text1中输入一串字母，单击“压缩”按钮Command1后，在文本框Text2中显示压缩后的结果。程序运行界面如图所示。

1. （1） 在设计程序界面时，要修改窗体显示的标题内容，则应修改该窗体的属性。
3. （2） 实现上述功能的VB程序如下，请在画线处填入合适代码。

   Private Sub Command1_Click()

   Dim s1 As String，s2 As String，pos As Integer

   Dim num As Integer

   s1=Text1. Text:s2=“”

       ①   

   pos=2

   Do While pos<=Len（s1）

     If Mid（s1, pos, 1）=Mid（s1, pos-1, 1）Then

       num=num+1

     Else

       s2=    ②   

       num=1

     End If

         ③   

   Loop

   Text2. Text=s2+Str（num）+Mid（s1, Len（s1）, 1）

   End Sub

   ① ② ③