【加试题】要求从某一字符串中删除指定的字符(假设所含的英文字母均为小写字母),并将处理后的字符串重新输出。程序功能:程序运行时,从文本框Text1中输入原始字符串,从文本框Text2中输入要删除的字符,单击Command1后,在文本框Text3中显示处理后的结果。操作界面与程序代码如下:
Dim s, k, resu As String
Dim i As Integer
s = Text1.Text
k = Text2.Text
For i = 1 To Len(s)
If
① Then
resu = resu + Mid(s, i, 1)
End If
Next i
② ‘输出处理后的结果
End Sub