編“字符串縮寫”程序，實(shí)現(xiàn)如下功能：在文本框Text1中輸入Ascii字符串，字符串中如果有由Ascii表中相鄰字符（升序）組成的子串，則把該子串縮寫成由第一個(gè)字符、“-”和最后一個(gè)字符組成，比如“abcdfpxcba”則縮寫成“a-dfpxcba”。程序運(yùn)行界面如圖所示。

（1）代碼“Private Sub Command1_Click （　?。敝械腃ommand1是

A

A

（單選，填字母：A．對象名/B．事件/C．事件處理過程）
（2）實(shí)現(xiàn)上述功能的VB程序如下，請?jiān)跈M線處填入合適的代碼。
Private Sub Command1_Click （　　）
Dim s As String,result As String,i As Integer,j As Integer,t As Integer
s=Text1．Text：t=Len（s）：result=““
i=1
Do While i＜=t
j=i
Do While i＜t
If Asc（Mid（s,i+1，1））=Asc（Mid（s,i,1））+1Then
i=i+1
Else
Exit Do
End If
Loop
If i＞j Then
result=①

result+Mid（s,j,1）+“-”+Mid（s,i,1）

result+Mid（s,j,1）+“-”+Mid（s,i,1）

Else
result=result+Mid（s,i,1）
End If
i=i+1
Loop
Text2．Text=②

result

result

End Sub
（3）如果輸入的字符串是“aBcucwxyzdcb”，輸出結(jié)果為

aBcucw-zdcb

aBcucw-zdcb