学进去

下列程序的功能是寻找并删除英语短文中的指定单词。程序运行时，在文本框Text1中输入英语短文，在文本框Text2中输入待删除的单词，单击“删除”按钮后，在文本框Text3中输出删除该单词后的短文，最后，在标签Label5中输出共删除的单词数。程序运行效果如下图所示：
           
（1）要使程序运行时，文本框Text1中显示的字符颜色为蓝色，可在Form_ Load事件过程中添加语句______。（单选，填字母：

A．Text1 = vbBlue /

B．Text1.ForeColor= vbBlue /

C．Text1.Text = vbBlue）

（2）实现上述功能的VB程序如下，请在划线处填入合适的代码。
Private Sub Command1_Click()
Dim s1 As String, s2 As String, st As String
Dim len1 As Integer, len2 As Integer, i As Integer, m As Integer
sl = Text1.Text: s2 = Text2.Text
len1 = Len(s1): len2 = Len(s2)
i=1: m=0
Do While i <=①_____
If Mid(s1, i, len2)=s2 Then
②______

m=m+1

Else
st=③_____
i=i+1
End If
Loop
Text3.Text =st
Label5.Caption = Str(m)
End Sub