為防止某傳染病，在堂食中不能兩個(gè)人相鄰就餐。為避免兩個(gè)人相鄰就餐，小明設(shè)計(jì)了一個(gè)VB程序，在Text1中輸入某一排座位就餐人員的分布情況，用字符“*”代表當(dāng)前座位有人，字符“#”代表當(dāng)前座位沒(méi)人。如“*#**”就代表該排座位號(hào)為1的座位有人，座位號(hào)為2的座位沒(méi)人，座位號(hào)為3的座位有人，座位號(hào)為4的座位有人。單擊“檢查”按鈕后，若該排有人相鄰就餐，則在標(biāo)簽Label2中輸出“警告！”；若該排沒(méi)有人相鄰就餐，則檢查該排座位中是否還可以再加入就餐，若可以，則在標(biāo)簽Label2中輸出這排中至多還能有幾個(gè)人入座；若不可以，則在標(biāo)簽Label2中輸出“該排人數(shù)已滿”。程序運(yùn)行界面如圖所示。

（1）觀察VB代碼，可知“檢查”按鈕的名稱(chēng)為

Cmd1

Cmd1

。
（2）實(shí)現(xiàn)上述功能的VB代碼如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Cmd1_Click （　?。?br />Dim s As String,c As String
Dim flag As Boolean
Dim i As Integer,count As Integer
s=Text1．Text
flag=True
For i=1 To Len（s）-1
c=Mid（s,i,2）
If c=″**″Then
①
Exit For
End If
Next i
s=″#″+s+″#″
count=0：i=2
Do While flag And i＜=Len（s）-1
If② Then
s=Mid（s,1，i-1）+″*″+Mid（s,i+1，Len（s）-i）
③
End If
i=i+1
Loop
If Not flag Then
Label2．Caption=″警告！″
ElseIf count=0 Then
Label2．Caption=″該排人數(shù)已滿″
Else
Label2．Caption=″該排至多還能有″+Str（count）+″個(gè)人入座″
End If
End Sub