用VB编写的英文单词查找程序如图所示，在文本框Text1中输入文章，在Text2中输入要查找的单词，单击“统计”按钮Command1，在列表框List1显示该单词出现的位置及次数．算法如下：
       （1）将文本框Text1中的文章保存到字符串变量s中，Text2中的单词保存到字符串变量s2中．
       （2）从左往右扫描字符串s,用字符串word存储文章中依次出现的单词，用整型变量b依次记录文章中每个单词的起始位置，用整型数组pos记录匹配到的单词的起始位置．
        按如下方法扫描：
        ①从左往右扫描，当扫描到第i个字符时，如果是字母，继续扫描，否则，跳转到②，直至扫描结束；
        ②将b到i-1组成一个单词word,与s2比较，如果相等，把该单词的起始位置b记录到pos数组中，并把b的值更新成下一个字符的位置，再跳转到①．
        （3）将pos数组中的位置及出现的总次数依次显示在列表框List1中．
（1）实现上述功能的VB程序如下，请在横线处填入合适的代码．
         Private Sub Command1_Click（　　）
                 Dim pos（1 To 1000）As Integer'存储匹配到的单词位置
                 Dim word As Srting'存储每次扫描到单词
                 Dim c As String,s As String,s2 As String
                 Dim i As Integer,j As Integer,k As Integer
                 b As Integer,slen As Integer
                 s=Text1．Text
                 slen=Len（s）
                 s2=Text2．Text
                 j=0'存储每个单词的长度
                 k=1'存储匹配到第几个单词的下标
                 b=1'存储每个单词的起始位置
                 i=1
                 Do While i＜=slen
                               c=Mid（s,j,1）
                               If c＞=“a“And c＞=“A“And c＜=“Z“Then
                                     j=j+1
                               Else
                                    If j＜＞0 Then
                                         word=

Mid（s,b,j）或Mid（s,b,i-b）

Mid（s,b,j）或Mid（s,b,i-b）

                                         If word=s2 Then
                                               pos（k）=b
                                               k=k+1
                                         End If
                                         j=0
                                   End If
                                   j=0
                              End If
                              b=i+1
                        End If
                        i=i+1
          Loop
          List1．AddItem“单词“+s2+“出现的位置为“
          For i=1 To k-1
               List1．AddItem Str（pos（i））
          Next
          List1．AddItem“共出现“+

Str（k-1）

Str（k-1）

+“次
End Sub
（2）根据本题算法，如图所示，若在Text2中输入“Your”单词，查找结果

会

会

（选填：会/不会）产生变化．