。(選填,填字碼:A.Label1/B.Command1/C.Text1和Text2) (2)請在橫線處填入合適代碼。 Private Sub Command1_Click ( ?。?br />Dim s As String,t As String,ch As String Dim c As String,num As String,ss As String Dim n As Integer,i As Integer s=Text1.Text:t=Text2.Text c=““:num=““:ss=s For i=Len(t) To 1 Step-1
If ch>=“a“And ch<=“z“Or ch>=“A“And ch=“Z“Then c=ch+c ElseIfch>=“0“And ch<=“9“Then num=ch+num Else n=Val(num) If ch=“-“Then s=Mid(s,1,n-1)+
Else s=Mid(s,1,n-1)+Mid(s,n+Len(c),Len(s)-n-Len(c)+1) End If ss=ss+“→“+s c=““:num=““ End If Next i Label1.Caption=ss End Sub (3)運行該程序,若文本框Text1中的內容是“April“,文本框Text2中的內容是”-3p+3ri-6e”,單擊撤銷按鈕,F(xiàn)or循環(huán)語句執(zhí)行完成后,字符串s的值是