题目

【加试题】小李编写VB程序，实现从某一字符串删除指定的连续字符串，并将处理后的字符串重新输出，程序界面如图所示，在文本框Text1中输人原始字符串，在文本框Text2中输入需要删除的连续字符串，单击Command1后，存寸本榧Text3中输出府h弹后的结果。 实现上述功能的VB程序如下．但加框处代码有错，请改正。   Dim P As String，k As String，x As Integer   Function f(a As Integer)As Boolean     f=false     If Mid(p，a，Len(k))=k Then f=True   End Function   Private Sub Command1_Click()   Dim x As Integer，result As Strin9，flag As Boolean     result=""     p=Text1．Text     k=Text2．Text     For x=1 To Len(P)-Len(k)+1          If Not f(x) Then             result=result+Mid(p，x，1)          Else                               ‘（1）          End If     Next x     Text3．Text=result+      ‘（2）   End Sub （1） 处加框代码应改为； （2） 处加框代码应改为。 答案： 【1】x=x+Len(k)-l 【1】Mid(p，x，Len(k)-1)

查看本题答案和解析